Нужна помощь,не могу сам разобраться. Как убрать полностью рамку,оставить только черный фон и при этом что бы фокус работал стабильно. И желательно что бы окно было неподвижным. Но как я понимаю,если рамку убрать. Двигать его не получится.
Код:
#include <WindowsConstants.au3>
#Include <WinAPI.au3>
$GUI = GUICreate("Switch Configurator", 700, 600, 550, 300, BitOR($WS_MINIMIZEBOX,$WS_SYSMENU,$WS_CAPTION,$WS_CLIPCHILDREN,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
$handle = ShellExecute ("cmd.exe","","C:\Users\Grx-lin\Downloads\")
Sleep(100)
$handle2 = _GetHwndFromPID($handle)
_WinAPI_SetWindowLong($handle, $GWL_EXSTYLE , $WS_EX_MDICHILD)
_WinAPI_SetParent($handle2,$GUI)
;~ WinSetState($AR1,"",@SW_MINIMIZE)
WinMove($handle2,"",0,250,700,310)
WinSetState($handle2,"",@SW_LOCK)
Func _GetHwndFromPID($PID)
$hWnd = 0
$stPID = DllStructCreate("int")
Do
$winlist2 = WinList()
For $i = 1 To $winlist2[0][0]
If $winlist2[$i][0] <> "" Then
DllCall("user32.dll", "int", "GetWindowThreadProcessId", "hwnd", $winlist2[$i][1], "ptr", DllStructGetPtr($stPID))
If DllStructGetData($stPID, 1) = $PID Then
$hWnd = $winlist2[$i][1]
ExitLoop
EndIf
EndIf
Next
Sleep(100)
Until $hWnd <> 0
Return $hWnd
EndFunc ;==>_GetHwndFromPID
Sleep(10000)