もう一個質問。
枠無しでサイズ変更可能なウィンドウを、マウスドラッグで移動させるスクリプト書いたけどちゃんと動作しない
左クリックするとナゼかウィンドウサイズが小さくなっていく・・・ボスケテ

#include "user32.as"

screen 0,1,1,screen_hide
bgscr 2,300,150,0,,,,
GetWindowLong hwnd, -16 //この２行を削除すると上手く動作するが
SetWindowLong hwnd, -16, stat + 0x00040000 //ウィンドウサイズが変更できなくなる
width 134,55
button "終了",*owari
onclick *click //左クリックでウィンドウを移動
stop

*click
check=wparam
if check!1 : stop
repeat
mx1=ginfo_mx : my1=ginfo_my
if cnt=0 {
mx2=mx1 : my2=my1
}
wx=ginfo_wx1 : wy=ginfo_wy1
getkey a,1
if a==1 : width ,,wx+mx1-mx2,wy+my1-my2 : else : break
wait 1
mx2=mx1 :my2=my1
loop
stop
*owari
end