|
皆さん、お茶をお楽しみのところご無礼します。
環境はWindowsXP Delphi6 Personalです。
印刷の初歩の初歩の入り口が解らずうろうろしています。
RichEditでメモ帳を作成していますが、印刷の段階で
はたとたたずんでいます。
印刷といえば
if PrintDialog1.Execute then
begin
RichEdit1.Print(Caption);
end;
位しか知りません。これでは間が抜けているので、XRAYさんの
plSetPrinterをインストールして、Demo、説明を読んでいるのですが
解りません。
RichEditに表示しているテキスト文を印刷しようとして
Printer.Title:='印刷のテスト';
Printer.Canvas.Font.Name:='ＭＳ ゴシック';
Printer.Canvas.Font.Size:=10;
Printer.Canvas.TextOut(1000,1000,TabSheetEx.RichEdit1.Text);
とやってみるのですが一行しか印刷しません。
つまり、高機能を使う以前のお馬鹿な質問ですがご指導ください
ませんか。
よろしくお願いします。
|