名前
題名
▼ igyさん > ▼ Mr.XRAYさん > > igy さんなんかどうですか ? > > （笑） > アドバイザーになれるほどの知識や経験、ないですよ〜 > > 私の場合、掲示板などの質問で、 > 　試していませんが、○○はいかがですか？ > とか、 > 　（問題が切り分けできていない質問などでは）○○をした場合、どうなりますか？ > とか、書き込んだりするぐらい しかできないので・・・ > > > 話は、変わりますが、 > 前に、WordやExcelでPDFファイルのエクスポートの事をここに書きましたが、 > Windows 10で「Microsoft Print to PDF」を使って、PDFファイルを生成するときも、 > 「印刷結果を名前を付けて保存」ダイアログを出さずに、生成 出来ないかな？って > 思ってたのですが、 > > Microsoft Print to PDF で C/C++ コードから出力ファイル名を指定する方法 > https://perce-neige.hateblo.jp/entry/2018/09/14/180047 > > があったので、Delphiで試してみたら、TPrinterの > SetPrinterメソッド の 引数 APort でファイル名を指定したら出来ました。 > > [ 013_プリンタのプロパティ設定 ] - Mr.XRAY > http://mrxray.on.coocan.jp/Delphi/plSamples/013_SetPrinterProperty.htm > の > > procedure TForm1.ComboBox1Select(Sender: TObject); > > begin > > //選択したプリンタを現在のプリンタとする > > Printer.PrinterIndex := ComboBox1.ItemIndex; > > > > //ここで取得するFDeviceMode1には，変更前のプリンタの情報が格納されている > > //その他の値は現在(変更後)のプリンタの情報となっている > > Printer.GetPrinter(FDevice, FDriver, FPort, FDeviceMode); > > //FDeviceMode初期化 > > Printer.SetPrinter(FDevice, FDriver, FPort, 0); > > //FDeviceModeが新しいプリンタドライバの値となる > > Printer.GetPrinter(FDevice, FDriver, FPort, FDeviceMode); > > end; > の部分を参考にさせてもらいました！ > > Printer.PrinterIndexが「Microsoft Print to PDF」を選択されたとき、 > > Printer.SetPrinter(FDevice, FDriver, FPort, 0); > の前に、 > StrPCopy(FPort, ファイル名); > のようにファイル名を指定してみたら、出来ました。 > > 以上、PDF関連情報でした！！
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link