名前 題名 ▼ おかぽむさん > お世話になります。 > > ちょっとしたデータファイル管理プログラムに、印刷機能をつけようと、 > 印刷プレビュー制御コンポーネントVer4.80をダウンロードし、 > 使い勝手を試しながら格闘させていただいています。 > > さて、標記の通りなのですが、フォームにぽとりぺたりした、TplPrevでは、 > エラーなく動作しますが、動的に作成したTplPrevを使用すると、 > BeginDocで FplSetPrinter= nil となってしまい、エラーが発生します。 > > そこで、調査したところ、安易な思考で、FplSetPrinter が内部で保持している > FTempSetPrinter を指すようになればOKと思い、以下の一行追加しました。 > > plPrev.plSetPrinter := nil; > > 次にSetplSetPrinterメソッド内を以下の通り変更 > > FplSetPrinter.Name:=Value.Name; > ↓ > if Value <> nil then FplSetPrinter.Name:=Value.Name; > > これで、エラーなく動作しているようですが、よろしくないでしょうか？ GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link