HSPの自ウィンドウのウィンドウスタイルをいじって外観チェック!

// ウィンドウスタイルいろいろ (by 無題な濃いログ)
#include "user32.as"
 screen , 250, 250
 style_name = "WS_VSCROLL", "WS_HSCROLL", "WS_SYSMENU"
style_name.3 "WS_THICKFRAME", "WS_MINIMIZEBOX", "WS_MAXIMIZEBOX"
 style_value = $00200000, $00100000, $00080000, $00040000, $00020000, $00010000
 pos 50, 50
 objsize 150, 22
 repeat 6
  button style_name.cnt, *change
 loop
 stop
*change
 style_btn = style_value(stat)
 GetWindowLong hwnd, -16
 if stat & style_btn {
  style_new = stat - style_btn
 } else {
  style_new = stat | style_btn
 }
 SetWindowLong hwnd, -16, style_new
 SetWindowPos hwnd, 0, 0, 0, 0, 0, $1 | $2 | $20
 ・Let's HSP! (ウインドウ関連)