🚀 go-pugleaf

Thanks a lot. The first exmaple with the  page setup is working, but not the
second. No dialog is shown.

Tom

"Keith" <kdopson@sbcglobal.net> schrieb im Newsbeitrag
news:41C19B3E.7A34D7BA@sbcglobal.net...
>
>
> "Thomas J." wrote:
>
> > Oh sorry I used to work with the VCL. It would be great if you could
send me
> > a code snippet how to open the dialog.
> >
> > My code snippet is not working.   Thanks for your help
> >
> >     LPPAGESETUPDLG pageSetup;
> >     bool result = PageSetupDlg(pageSetup);
> >     if (result) {
> >         MessageDlg("Ok", mtInformation, TMsgDlgButtons() << mbOK, 0);
> >     } else {
> >         MessageDlg("Error", mtError, TMsgDlgButtons() << mbOK, 0);
> >     }
> >
> >     PRINTDLG printerSetup;
> >     result = PrintDlg(&printerSetup);
> >     if (result) {
> >         MessageDlg("Ok", mtInformation, TMsgDlgButtons() << mbOK, 0);
> >     } else {
> >         MessageDlg("Error", mtError, TMsgDlgButtons() << mbOK, 0);
> >     }
> >
>
> There are a few things missing from your example:
>
> LPPAGESETUPDLG pageSetup;
> pageSetup=new PAGESETUPDLG;      // create a new structure
> ZeroMemory(pageSetup,sizeof(PAGESETUPDLG)); // clear it out
> pageSetup->lStructSize=sizeof(PAGESETUPDLG); // set the structure size
> pageSetup->hwndOwner=Handle;  // and owner handle
>
>     bool result = PageSetupDlg(pageSetup);
>     if (result) {
>         MessageDlg("Ok", mtInformation, TMsgDlgButtons() << mbOK, 0);
>     } else {
>         MessageDlg("Error", mtError, TMsgDlgButtons() << mbOK, 0);
>     }
> delete pageSetup;   // delete it when you are through using it.
>
>     PRINTDLG printerSetup;
> ZeroMemory(&printerSetup,sizeof(PRINTDLG)); // clear out this local
structure
> variable
> printerSetup.lStructSize=sizeof(PRINTDLG); // set the structure length
> printerSetup.hwndOwner=Handle; // and owner handle
>
>     result = PrintDlg(&printerSetup);
>     if (result) {
>         MessageDlg("Ok", mtInformation, TMsgDlgButtons() << mbOK, 0);
>     } else {
>         MessageDlg("Error", mtError, TMsgDlgButtons() << mbOK, 0);
>     }
>
>
> keith
>
>