PrintDialogの使い方

PrintDialogは図のような「印刷」ダイアログを表示するために使用します。

使用例

procedure TForm1.Print2Click(Sender: TObject);
begin
  // ページ指定オプションを設定
  PrintDialog1.Options := [poPageNums];
  if PrintDialog1.Execute then
  begin
     ..... ;  // ここでPrintDialogのプロパティに従って印刷を行う。
  end;
end;