しかし、SetWindowLongを使用しようとすると「外部DLLの読み出しに失敗」といったエラーが出ます。
どのように直せばよいでしょうか・・・?
プログラム全てだと長いので、要所を抜き出しました(この状態で実行してもエラーが出ることは確認してます)
#uselib "user32.dll" #include "hspext.as" #func SetWindowLong "SetWindowLongA" int,int,int #func SetLayeredWindowAttributes "SetLayeredWindowAttributes" int,int,int,int #const LWA_COLORKEY 255//透明色を指定 #const LWA_ALPHA 2//アルファー値を指定 #const GWL_EXSTYLE -20//拡張ウィンドウスタイル #const WS_EX_LAYERED $00080000//透明なウィンドウ属性 #const WS_EX_TRANSPARENT $00000020 chgdisp 1,ginfo(20),ginfo(21) bgscr 0,ginfo(20),ginfo(21),,0,0 SetWindowLong hwnd,-20,WS_EX_LAYERED|WS_EX_TRANSPARENT SetLayeredWindowAttributes hwnd,0,1,1 color:boxf 0,0,ginfo(20),ginfo(21)//画面を黒四角形で覆う bgscr 1,100,60,,0,0 gsel 1,2//ボタンをアクティブ状態に変化 width 100,40 objsize 100,20 button "REC START",*rec objsize 100,20 button "PLAY START",*play stop *play *rec