実行してみればわかると思います。
#include "user32.as"
#define GW_HWNDNEXT 2
#define GWL_STYLE -16
#define GWL_EXSTYLE -20
#define WS_MAXIMIZEBOX 0x00010000
#define WS_MINIMIZEBOX 0x00020000
#define WS_SIZEBOX 0x00040000
#define WS_VSCROLL 0x00200000
#define WS_HSCROLL 0x00100000
#define WS_BORDER 0x00800000
#define WS_CAPTION 0x00C00000
#define WS_TABSTOP 0x00010000
#define WS_EX_DLGMODALFRAME 0x00000001
#define WS_EX_TRANSPARENT 0x00000020
#define WS_EX_TOOLWINDOW 0x00000080
#define WS_EX_WINDOWEDGE 0x00000100
#define WS_EX_CLIENTEDGE 0x00000200
#define WS_EX_STATICEDGE 0x00020000
#define WS_EX_APPWINDOW 0x00040000
screen 0,300,1000:title "ALL CHANGER (DANGER?)"
dim p,100
objsize 300,20
chkbox "最小化変更ボタン",p.0
chkbox "最大化変更ボタン",p.1
chkbox "サイズ変更境界",p.2
chkbox "垂直スクロールバー",p.3
chkbox "水平スクロールバー",p.4
chkbox "境界線",p.5
chkbox "タイトルバー",p.6
chkbox "WS_TABSTOP(意味がない)",p.7
chkbox "EX:WS_EX_DLGMODALFRAME(?)",p.50
chkbox "EX:WS_EX_TRANSPARENT(?)",p.51
chkbox "EX:WS_EX_TOOLWINDOW(Tool Edge)",p.52
chkbox "EX:WS_EX_WINDOWEDGE(?)",p.53
chkbox "EX:WS_EX_CLIENTEDGE(Deep Edge)",p.54
chkbox "EX:WS_EX_STATICEDGE(Weak Edge)",p.55
chkbox "EX:WS_EX_APPWINDOW(?)",p.56
button "実行",*ntt
stop
*ntt
F=0
F+=(p.0 )*WS_MINIMIZEBOX
F+=(p.1 )*WS_MAXIMIZEBOX
F+=(p.2 )*WS_SIZEBOX
F+=(p.3 )*WS_VSCROLL
F+=(p.4 )*WS_HSCROLL
F+=(p.5 )*WS_BORDER
F+=(p.6 )*WS_CAPTION
F+=(p.7 )*WS_TABSTOP
G=0
G+=(p.50)*WS_EX_DLGMODALFRAME
G+=(p.51)*WS_EX_TRANSPARENT
G+=(p.52)*WS_EX_TOOLWINDOW
G+=(p.53)*WS_EX_WINDOWEDGE
G+=(p.54)*WS_EX_CLIENTEDGE
G+=(p.55)*WS_EX_STATICEDGE
G+=(p.56)*WS_EX_APPWINDOW
color 255,255,255
boxf
color 0,0,0
pos 0,0
GetDesktopWindow:DTH=stat
GetTopWindow DTH:TH=stat
font "",10
sdim dt,256
repeat
GetWindowlong TH,GWL_STYLE:S=stat
SetWindowLong TH,GWL_STYLE,S^F:mes ""+S+"-"+(S^F)
GetWindowlong TH,GWL_EXSTYLE:S=stat
SetWindowLong TH,GWL_EXSTYLE,S^G:mes ""+S+"-"+(S^G)
GetWindow TH,GW_HWNDNEXT : TH=stat
if TH=0:break;
if TH=hwnd:continue;
loop
おもしろい(?)ものを作ってみた。
