「koji」さん、おはようございます。

＞議題の仲に”アプリケーションの２重起動防止”について、質問があるのですが、結果として
＞FindWindowで２重化の防止ができるとの事ですが､この方法では､ アプリケーションのＯＰＥＮ
＞イベントにアプリケーション毎に別々のウィンドウ名を記述しないならない為、部品（共通プログラム）
＞として作成できません。

「てとらぽっと」さんのコメントでＯＫですが、こんな方法もあると思います。
アプリケーション起動時に、そのアプリケーション固有の設定をiniファイルから読み込み、その中で
二重起動チェックのためのウィンドウタイトル名も取得して、二重起動の確認を行います。

????????????????????????????????????????
[アプリケーションのopenイベント]
//このアプリケーションが二重起動しているかどうか確認する
string windowTitle
unsignedLong ll_hwnd

//ウィンドウタイトル名を\"test.ini\"から取得
windowTitle = ProfileString(\"TEST.INI\", \"Application\", \"WindowTitle\", \"\")

//WindowsAPIをコールして、同じタイトル名を持つアプリケーションを調べる
ll_hwnd = FindWindowA(0,windowTitle)

if ll_hwnd<>0 then MessageBox(\"\",\"このアプリケーションは二重起動しています。~r~nハンドル
=\"+String(ll_hwnd))

open(w_xxxx)
????????????????????????????????????????
[test.iniファイル]
[Application]
WindowTitle=「***二重起動を確認するウィンドウのタイトル名***」
????????????????????????????????????????

なお、FindWindowAはWindows32APIを、外部関数として定義しています。
詳しくは、パワーソフト社ＨＰの\"Faxline Index\"のドキュメントID:4545
http://www.powersoft.co.jp
「32-bit環境におけるPowerBuilderからのWindows APIの呼び出し」
を参照して下さい。