PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
14835 01/03/22 08:58:02 RE(7):PB6.5: ありがとうございます By aqua
14831 01/03/21 16:56:51 RE(6):PB6.5: 任意でプリンタの指定をするには?(サンプル2-2) By M.M
14830 01/03/21 16:54:17 RE(5):PB6.5: 任意でプリンタの指定をするには?(サンプル2-1) By M.M
14829 01/03/21 16:47:12 RE(4):PB6.5: 任意でプリンタの指定をするには?(サンプル1-2) By M.M
14828 01/03/21 16:46:43 RE(3):PB6.5: 任意でプリンタの指定をするには?(サンプル1-1) By M.M
14827 01/03/21 15:40:17 RE(2):PB6.5: 任意でプリンタの指定をするには? By aqua
14826 01/03/19 18:58:27 RE(1):PB6.5: 任意でプリンタの指定をするには? By Taka
14824 01/03/19 12:00:50 PB6.5: 任意でプリンタの指定をするには? By aqua

カテゴリ:印刷処理
日付:2001年03月21日 16:46 発信者:M.M
題名:RE(3):PB6.5: 任意でプリンタの指定をするには?(サンプル1-1)

aquaさん、こんにちは。

>やはり『PBだけで任意指定を…』っていうのはできないんですね。
>アドバイスを頂いたAPIを利用して何とかやってみます。

あわてる乞食はもらいが少ないです。
Takaさんのコメントをよく読みましょう。
API系以外にレジストリやWin.iniをイジる方法が過去ログにあります。

ついでに、過去ログの情報を整理して新しくサンプルPGを作ってみました。


【動作確認環境】
OS: Windows98, NT4.0 SP6a
PB: PB5.0.4

【登録されているプリンタの一覧を取得し、リストボックス\"lb_printers\"に表示する】
//初期設定
environment env
string subKeyList[]
integer err
long keyMax,l


//OS種別を取得し、OS名を画面に表示する
//環境情報を取得
err = getEnvironment(env)
if err=-1 then
//エラー処理
messageBox(\"エラー\",\"GetEnvironment関数実行時に、エラーが発生しました\")
return
end if

//OS種別の判定
choose case env.OSType
case Windows!
sle_os_name.text = \"Windows 95/98\"
case WindowsNT!
sle_os_name.text = \"Windows NT\"
case else
//エラー処理
messageBox(\"エラー\",\"このOSには対応していません\")
return
end choose

(サンプル1-2に続く)



付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows NT 4.0
DBMS Oracle SQL*Net 8
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS Oracle 8.0
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.