PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 4634 | 99/01/18 22:43:32 | RE(7):Ferrlibを使ってください By あすかちゃんの父 |
| 4625 | 99/01/18 17:03:51 | RE(6):PB4.0.03: プログラムの２重起動制御 By まこと |
| 4624 | 99/01/18 15:49:11 | RE(5):PB4.0.03: プログラムの２重起動制御 By MORIMORI |
| 4623 | 99/01/18 15:45:23 | RE(4):PowerBuilder二重起動防止について(16bit版のみ) By MORIMORI |
| 4619 | 99/01/18 14:46:40 | RE(3):PowerBuilder二重起動防止について(16bit版のみ) By M.M |
| 4616 | 99/01/18 13:33:08 | RE(2):PB4.0.03: プログラムの２重起動制御 By こてちゅ |
| 4615 | 99/01/18 13:25:20 | RE(1):PB4.0.03: プログラムの２重起動制御 By ふくちゃん |
| 4614 | 99/01/18 11:49:02 | PB4.0.03: プログラムの２重起動制御 By MORIMORI |
カテゴリ：PowerBuilderの開発環境
日付：1999年01月18日 14:46 発信者：M.M
題名：RE(3):PowerBuilder二重起動防止について(16bit版のみ)
「MORIMORI」さん、こんにちは。
＞以下の件で教えて下さい
＞
＞作成したアプリが２重実行できない様にしたいのです
PowerBuilderのバージョンは4.0.03ですよね。16bit版ですか？
PBの16bit版では、Handle関数で二重起動のチェックができます。
＜以下は、PB5のヘルプ(例:Handle 関数(PowerScript))から複写＞
???????????????????????????????????
次の例は、アプリケーションの Open イベントに対するスクリプトです。
同じアプリケーションがすでに実行中であるかどうかをチェックし、すでに
実行中の場合は、同じアプリケーションが再び実行されないようにします。
実行中でない場合は、アプリケーションのウィンドウ w_main を開きます。
IF Handle(This, TRUE) > 0 THEN
MessageBox(\"Application Already Running\", &
This.AppName + \" is already running.\" &
+ \" You cannot start it again.\")
HALT CLOSE
ELSE
Open(w_main)
END IF
???????????????????????????????????
注意点として、このロジックはPBの16bit版のみ有効で、32bit版のPBでは無効です。
(Handle(<アプリケーションオブジェクト>,TRUE)が常に0で返ってくる)
32bit版のPBでアプリの二重起動チェックをする場合は、「ふくちゃん」さん「こてちゅ」さんの
方法にして下さい。
＃今日は、パワースペースにスカスカつながるので気持ちがいい。吉日かな？
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows NT 4.0
DBMS Oracle SQL*Net 2.2
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS Oracle 7.2
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.