この発言は
#00031　Athena          さんのプリンター名の取得
に対するコメントです

この発言に対し以下のコメントが寄せられています

#00041　Athena          さん　RE^2:プリンター名の取得






>//Form1にPrinterSetupDialogコンポ(PrinterSetupDialog1)を追加しておく
>//uses 節にPrintersを追加しておく
>//Button1Clickでプリンター名をShowMessage
>
>procedure TForm1.Button1Click(Sender: TObject);
>begin
>   PrinterSetupDialog1.Execute ;//デフォルトプリンター名の場合、省略する
>   ShowMessage('プリンター名： '+ Printer.Printers[Printer.PrinterIndex]);
>end;

#31 Athena さん こんにちは らせん企画の佐々木です
  直接 Printer.Printers を参照したほうが簡単ではないでしょうか。

             97/10/19(Sun) 07:02am  BYQ05322 らせん企画の佐々木

Original document by らせん企画      氏 ID:(BYQ05322)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。