喫茶XRAY [Mr.XRAY掲示板]

▼ 宮さん
印刷の際の余白というのは、そのアプリを作成する人が設定するものです。
余白を決めたら、その余白に入るように印刷のコードを書くわけです。

例えばワードでは、余白を設定する画面があります。これを設定すると
ワードは、印刷の時に(もちろん印刷プレビューの時も)これに合わせて
印刷するようになっているわけです。

例えばここを見て下さい。
http://homepage2.nifty.com/Mr_XRAY/Delphi/plPrev/T_TextOutFile.htm
ここのリスト1では、

with plPrev1 do begin
         TopMargin   := 300; {上端マージン}
         BottomMargin:= 250; {下端マージン}
         LeftMargin  := 300; {左端マージン}
         RightMargin := 250; {右端マージン}

というコードで、余白(マージン)を決めています。決めたからといって
その設定を自動的にOSやDelphiがやつてくれるわけではありません。
自分で、これらの値を使用したコードを書くわけです。
必要であれば、これらの値を入力するためのTEditを配置したフォームを
作成するわけです。上ではコード上で設定しているだけです。

Delphi7であれば、PageSetupDialogを使用して次のようにもできますが、
そうでなければ、自作です。
http://homepage2.nifty.com/Mr_XRAY/Others/PageSetupDialog.htm

procedure TForm1.Button1Click(Sender: TObject);
begin
     if PageSetupDialog1.Execute then begin
       TopMargin:=PageSetupDialog1.MarginTop;
     end;
end;