Changing the Title of a Print Dialog in Delphi

The TPrintDialog component displays a standard Windows dialog box for sending jobs to a printer.

Unfortunately, the TPrintDialog does not expose the Title property.

By handing the OnShow event of a print dialog you can specify the text for the dialog’s title bar:

 //handles PrintDialog1.OnShow

 procedure TReportForm.PrintDialog1Show(Sender: TObject) ;
 begin
   if Sender is TPrintDialog then
     SetWindowText(
       TPrintDialog(Sender).Handle,
       'How do you want to print your report?') ;
 end;

 Note: a common dialog box opens when its Execute method is called.