×ボタンを消す方法もどうでしょうか?Screen1の×が消えます。
※閉じるにはメイン(0)の×ボタンを押してください。
以前どこかから参考にしたものですが、どこにあったか忘れちゃいました。(^_^;)
#uselib "user32.dll"
#func SetLong "SetWindowLongA" int,int,int
#cfunc GetLong "GetWindowLongA" int,int
#define StyleAdd(%1,%2=0,%3=0)ujw=((%3)&2)*-2-16 :\
SetLong %1,ujw,GetLong(%1,ujw)|(%2)^((%3)&1)*(%2):gsel ginfo_sel,-1:gsel ginfo_sel,1
screen 1,200,150,0,220,50
title "×ボタン消す"
StyleAdd hwnd, $80000,1