名前 題名 ▼ マスターさん > ▼ KSCさん > > いらっしゃいませ．拙作コンポのご利用サンクスです． > > >PaperWidth = 2970 , PaperHeight = 2100 > >PageWidth = 2040 , PageHeight = 2800 > > うえっ，バグでしょうか．早速調査いたしました． > 用紙のサイズはどのように設定したのでしょうか． > 私のテスト内容です． > > (1)新規プロジェクト作成 > (2)フォームに以下を各々ひとつづつ配置 > Button > plSetPrinter (用紙の設定をする時には必要．使用しないとplPrevは > プリンタの現在の設定を使用する) > plPrev > (4)plSetPrinter(プリンタ設定コンポ)をダブルクリックして > ダイアログの用紙設定で[印刷方向]を[横]にする > (3)以下のコード書いて実行．横方向にプレビューも印刷もできました． > どうでしょうか． > > procedure TForm1.Button1Click(Sender: TObject); > begin > plPrev1.BeginDoc; > plPrev1.FontSize(100); > plPrev1.TextOut(300,500,'喫茶XRAY 喫茶XRAY 喫茶XRAY'); > plPrev1.EndDoc; > plPrev1.ShowModal; > end; > > end. > > テスト環境は，Delphi5 Pro(UP1), WindowsXP(SP2) > plSetPriner,plPrev共最新バージョンです． > プリンタは，PCのLPT1接続のEPSON PX-V600です． > GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link