HSPTV!掲示板

HSPでwidth命令を使って幅を指定しました。こんな感じです。

#include "user32.as"
screen 0,ginfo(20),ginfo(21)
GetWindowLong hwnd, -16
SetWindowLong hwnd, -16, stat | $10000 | $40000
width 450,450

repeat
mes ginfo(10)
cls
wait 1
loop

このとき、ginfo(10)は456になります。
タイトルバーがどうとか、色々あって456になるのは分かるのですが、widthで指定した通りの値を取得したいと思っているのですが、どうすればいいのでしょうか？

ginfo.12 あるいは ginfo_winx で……と思ったのですが、これだと 448 になりますね……

SetWindowLongでスタイルを変更している影響で、width命令内部での計算方法が
実情と合わなくなっているのかもしれません。

SetWindowPosでウィンドウサイズを変更するようにしてみました。
その際、外枠込みでのウィンドウサイズを指定する必要があるので、
あらかじめAdjustWindowRectExで、外枠込みのウィンドウサイズを取得しています。
（参考　http://hsp.tv/play/pforum.php?mode=pastwch&num=5961）

#include "user32.as"

screen 0,ginfo(20),ginfo(21)

GetWindowLong hwnd, -20	//拡張ウィンドウスタイルを取得
exStyle = stat
GetWindowLong hwnd, -16	//ウィンドウスタイルを取得
style = stat | $10000 | $40000
SetWindowLong hwnd, -16, style

rect=0,0,450,450
AdjustWindowRectEx varptr(rect), style, 0, exStyle
SetWindowPos hwnd,0,0,0,rect(2)-rect(0), rect(3)-rect(1),$26

repeat
mes ginfo_winx
mes ginfo_winy
cls
wait 1
loop