「◆プリンタ設定」の編集履歴（バックアップ）一覧に戻る
◆プリンタ設定 - (2009/05/31 (日) 17:28:32) のソース
*情報
作者名：hihiro
引用元：[[なでしこプログラム掲示板「プリンタ設定」>http://www.himanavi.net/cgi/nade-bbs/cbbs.cgi?mode=al2&namber=901&rev=&no=0]]
*概要
なでしこのプリンタ設定をプログラムから設定します。
*解説
【プリンタ設定用変数の用紙設定】に、【セクション名】を設定
【プリンタ設定変更関数】を呼ぶ
【プリンタの設定】ダイアログが表示され、
【設定.INI】の【セクション名】に設定されているプリンタ情報に設定します
出力（戻り）項目
【プリンタ設定用変数の用紙サイズ】に変更された用紙サイズ
【プリンタ設定用変数の給紙方法】に変更された給紙方法
【プリンタ設定用変数の用紙向】に変更された用紙の向き
【設定.INI】の【セクション名】に設定されたプリンタ情報を保存します
タイマーを起動して、プリンタの設定ダイアログを表示して、
タイマーの割込みでプリンタの設定をしています
プリンタ名は、プリンタ切替えがうまくできないので未使用です。
*本体
＃以下、プリンタ設定プログラム＃＃＃＃＃＃＃＃＃＃
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
＃ プリンタ設定ダイアログ監視タイマー ＃
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
プリンタ監視タイマーとは、タイマー
その値は、500
その時満ちた時は
もし ＰＲＮの設定中=オフならば
ＰＲＮの設定中は、オン
プリンタ情報設定
ＰＲＮの設定中は、オフ
ＰＲＮとは、プリンタ設定用変数
待機
■プリンタ設定用変数
・プリンタ名{文字列} ＃プリンタ設定ＩＤ＝1136
・用紙サイズ{文字列} ＃プリンタ設定ＩＤ＝1137
・給紙方法{文字列} ＃プリンタ設定ＩＤ＝1138
・用紙向{文字列} ＃用紙の向 縦、横
・読込完了フラグ{整数} ＃プリンタ情報読込完了＝オン
・設定中フラグ{整数} ＃プリンタ情報設定中＝オン
・用紙設定{文字列} ＃
●プリンタ設定変更
プリンタ監視タイマーを開始
プリンタ設定
もし それ=はいならば
プリンタ設定保存
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
＃タイマーから呼び出されプリンタ設定を行う＃
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
●プリンタ情報設定
Hとは、数値 ＃一時ハンドル
プリンタ名Hとは、数値 ＃プリンタ名ハンドル ＩＤ＝1136
用紙サイズHとは、数値 ＃用紙サイズハンドル ＩＤ＝1137
給紙方法Hとは、数値 ＃給紙方法ハンドル ＩＤ＝1138
項目一覧とは、文字列 ＃プリンタ設定ダイアログ項目一覧
Hは、「プリンタの設定」を窓ハンドル検索
もし H<>0ならば
項目一覧は、Hの窓ハンドル内列挙
項目一覧の3から1136を表ピックアップ
プリンタ名Hは、それ[0,0]
＃プリンタ名Hは、GetDlgItem(H,1136）
項目一覧の3から1137を表ピックアップ
用紙サイズHは、それ[0,0]
＃用紙サイズHは、GetDlgItem(H,1137）
項目一覧の3から1138を表ピックアップ
給紙方法Hは、それ[0,0]
＃給紙方法Hは、GetDlgItem(H,1138）
もし ＰＲＮの読込完了フラグ=オフならば
ＰＲＮの読込完了フラグは、オン
プリンタ設定読込
EnableWindow（プリンタ名H,0） ＃プリンタ名コンボを無効
＃もし ＰＲＮのプリンタ名[0,0]<>「」ならば
＃ プリンタ名HにＰＲＮのプリンタ名[0,1]を窓ハンドル値設定
もし ＰＲＮの用紙サイズ[0,0]<>「」ならば
用紙サイズHにＰＲＮの用紙サイズ[0,1]を窓ハンドル値設定
もし ＰＲＮの給紙方法[0,0]<>「」ならば
給紙方法HにＰＲＮの給紙方法[0,1]を窓ハンドル値設定
もし ＰＲＮの用紙向＝「横」ならば
項目一覧の3から1057を表ピックアップ
それ[0,0]を窓ハンドルクリック
違えば
項目一覧の3から1056を表ピックアップ
それ[0,0]を窓ハンドルクリック
＃ＰＲＮのプリンタ名は、アイテム取得（プリンタ名H）
ＰＲＮの用紙サイズは、アイテム取得（用紙サイズH）
ＰＲＮの給紙方法は、アイテム取得（給紙方法H）
違えば
ＰＲＮの読込完了フラグは、オフ
プリンタ監視タイマーを停止
＃プリンタ設定項目のハンドルからアイテム名と値を
●アイテム取得（ハンドル）
アイテム一覧とは、文字列
アイテム名とは、文字列
アイテム値とは、数値
アイテム一覧は、ハンドルを窓ハンドルアイテム取得
アイテム値は、ハンドルを窓ハンドル値取得
もし アイテム値>=0ならば
アイテム名は、アイテム一覧\アイテム値
それは、「{アイテム名},{アイテム値}」
違えば
それは、「"",{アイテム値}」
＃プリンタ設定結果を保存
●プリンタ設定保存
Hとは、数値
もし プリンタ用紙高さ＞プリンタ用紙幅ならば
ＰＲＮの用紙向は、「縦」
違えば
ＰＲＮの用紙向は、「横」
「{母艦パス}設定.ini」のINI開く
Hは、それ
＃Hで「{ＰＲＮの用紙設定}」の「プリンタ名」にＰＲＮのプリンタ名をINI書く
Hで「{ＰＲＮの用紙設定}」の「用紙サイズ」にＰＲＮの用紙サイズをINI書く
Hで「{ＰＲＮの用紙設定}」の「給紙方法」にＰＲＮの給紙方法をINI書く
Hで「{ＰＲＮの用紙設定}」の「用紙向」にＰＲＮの用紙向をINI書く
HのINI閉じる
＃プリンタ設定を読み込む
●プリンタ設定読込
Hとは、数値
「{母艦パス}設定.ini」のINI開く
Hは、それ
＃ＰＲＮのプリンタ名は、Hで「{ＰＲＮの用紙設定}」の「プリンタ名」をINI読む
ＰＲＮの用紙サイズは、Hで「{ＰＲＮの用紙設定}」の「用紙サイズ」をINI読む
ＰＲＮの給紙方法は、Hで「{ＰＲＮの用紙設定}」の「給紙方法」をINI読む
ＰＲＮの用紙向は、Hで「{ＰＲＮの用紙設定}」の「用紙向」をINI読む
HのINI閉じる
●EnableWindow（H,B）=DLL("user32.dll",
"BOOL EnableWindow(HWND hWnd,BOOL bEnable)")
＃プログラム ここまで＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
*//サンプルプログラム
！変数宣言が必要
！母艦設計＝「母艦の可視はオフ」
＃ここからは、動作確認用プログラム＃＃＃＃＃＃
母艦のサイズは、「10,10,400,300」
母艦のテキストは、「プリンタ設定動作確認プログラム」
＃ボタン作成
設定１ボタンとは、ボタン
その位置は、「50,10」
その幅は、200
そのクリックした時は
ＰＲＮの用紙設定は、「設定１」
プリンタ設定変更
設定１ボタンのテキストは、「{ＰＲＮの用紙サイズ\0,0} {ＰＲＮの用紙向}」
設定２ボタンとは、ボタン
その位置は、「50,40」
その幅は、200
そのクリックした時は
ＰＲＮの用紙設定は、「設定２」
プリンタ設定変更
設定２ボタンのテキストは、「{ＰＲＮの用紙サイズ\0,0} {ＰＲＮの用紙向}」
設定３ボタンとは、ボタン
その位置は、「50,70」
その幅は、200
そのクリックした時は
ＰＲＮの用紙設定は、「設定３」
プリンタ設定変更
設定３ボタンのテキストは、「{ＰＲＮの用紙サイズ\0,0} {ＰＲＮの用紙向}」
母艦の可視は、オン
----
- 転載ありがとうございます。私も＠ｗｉｋｉ使い始めたところです。 -- hihiro (2008-09-27 18:15:34)
- こちらこそ転載させていただいてとても感謝ですー -- 管理人 (2008-09-30 21:34:32)
#comment()
----
