画面ハードコピー印刷

ひよこ 2012-10-30 20:23:28 No: 43288

ボタン押下でForm1の画面ハードコピーを印刷できるようにしたいのですが、可能でしょうか？？

なんだかな〜 2012-10-30 22:55:31 No: 43289

可能です。

プログラミングの勉強と同時に「質問の仕方」の勉強をされることをお勧めします。

RAD命 2012-10-31 01:49:25 No: 43290

↑見たら、自分の初質問だったという…ｗ。
名前が違うのは、ハンドルネームを変えたからで、
Delphi一筋から、C++、C#、Java関係等、言語数種類使うようになり、
RAD環境をこよなく愛用するようになったからだったり。

少し脱線してしまいましたが、
掲示板検索と、ネット検索、Delphiのヘルプをもっと活用すると、
相当に便利ですよ。

ここは、非常に優れたプログラミング情報の宝庫ですから。
自分は、これで相当助けられてます。

Mr.XRAY 2012-10-31 02:01:57 No: 43291

私が書こうと思っていたことを書かれてしまったので．
かわりに，方法を書いておまきす．

(1) 対象となるフォームのハードコピー操作を実行する
(2) コピーされた画像を，ビットマップ等を生成して，そこに格納する
(3) そのビットマップをプリンタに出力する

という手順になると思います．

ただし，コーディングによっては，Windows 3.1, 95, 98, ME, Vista, 7, 8, MAC OS X, Lion
のいずれか，または複数で期待通りの動作をしないかも知れません．
また，32 bit か，64 bit かによっても同じことが言えるかも知れません．

Delphi のバージョンによっては，ビットマップの扱いに注意が必要かも知れません．

DEKO 2012-10-31 02:10:59 No: 43292

フォームの単純な印刷 (ハードコピー) でよいのなら、

procedure TForm1.Button1Click(Sender: TObject);
begin
//Form1.Printscale := poPrintToFit; // poNone / poPrintToFit / poProportional
Form1.Print;
end;

TForm の Print メソッドを呼ぶだけです。

DEKO 2012-10-31 02:14:59 No: 43293

> TForm の Print メソッドを呼ぶだけです。
FireMonkey にはないですけどね (^^;A