PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
10328 00/02/17 13:32:36 RE(6):PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By さい
10317 00/02/17 09:58:32 RE(5):PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By Potato
10316 00/02/17 09:47:53 RE(4):PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By さい
10315 00/02/17 09:33:13 RE(3):PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By Potato
10303 00/02/16 18:02:32 RE(2):PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By てとらぽっと
10301 00/02/16 17:52:18 RE(1):PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By こてちゅ
10299 00/02/16 17:31:47 PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい By さい

カテゴリ:スクリプトの記述
日付:2000年02月16日 17:31 発信者:さい
題名:PB6.5: 画面の解像度の影響を受けずに、ウインドウのポジションを画面の中心に設定したい

こんにちは。

PB5.0(16Bit)からPB6.5(32Bit)にマイグレーションしています。
PB5.0のときには以下のスクリプトでウインドウを画面中心に設定できたのですが
32Bit化と言う事で、手直しをしたいのですがうまくいきません。
とりあえず、
user.exe → user32.exe
に変更し
GETSYSTEMMETRICS(int nIndex)
GETSYSTEMMETRICSA(int nIndex)
の2パターンで試しましたがだめでした。([user32.exe]のオープンエラー)
資料も少なく、自分でもどうしたら良いか思い付きません。

なにかいい方法 OR こう試してみては?
と言う事がありましたらぜひ教えて下さい。

/************ スクリプト ************************************************/

[宣言] Function int GETSYSTEMMETRICS(int nIndex) library \"user.exe\"

Int iScreenWidth
Int iScreenHeight
Int SM_CXSCREEN = 0
Int SM_CYSCREEN = 1
Int iNewX, iNewY

iScreenWidth = PixelsToUnits(GetSystemMetrics(SM_CXSCREEN), XPixelsToUnits!)
iScreenHeight = PixelsToUnits(GetSystemMetrics(SM_CYSCREEN), YPixelsToUnits!)

iNewX = Max((iScreenWidth - windowname.Width) / 2, 0)
iNewY = Max((iScreenHeight - windowname.Height) / 2, 0)
Move(windowname, iNewX, iNewY)

/*********************************************************************/

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows95
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

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

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