delphi - ShellExecute ファイルの代わりにストリームから印刷

Question

これとともに

ShellExecute(Handle, 'print', PChar(ExtractFilePath(ParamStr(0))+'Test.txt'), 
   nil, nil, SW_HIDE);

ファイルの印刷が可能です。

TStreamストリームから直接印刷できるように、ファイルの代わりに使用する方法はありますか?

Answer 1

ShellExecuteいいえ、 Delphi ストリームからの印刷には使用できません。を呼び出すとShellExecute、印刷操作を実行する別のプロセスが発生します。そして、その別のプロセスは Delphi ストリームを見ることができません。

いくつかのオプションが思い浮かびます。

1. ストリームを一時ファイルに保存し、ShellExecute.
2. Delphi から直接テキストを出力します。手っ取り早い方法の 1 つは、テキストを に追加し、そのメソッドTRichEditを呼び出すことです。PrintAndreas Rejbrand の詳細はこちら。