Hallo Profis,
ich habe per KODA eine GUi erstellt die die gesamte Displaygröße einnimmt. Das Proggi will ich auf verschiedenen Rechnern einsetzen. Wenn nun die Displayskalierung nicht 100% ist, sondern größer, wird die Form abgeschnitten. Gibt es eine Möglichkeit dies zu verhindern. Hier der Code für die Gui:
Code
#Region ### START Koda GUI section ###
$Form1 = GUICreate("Name der Gui", @DesktopWidth, @DesktopHeight, -1, -1, BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_MAXIMIZE,$WS_TABSTOP))
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUISetBkColor(0xFFFFFF)
$Startbutton = GUICtrlCreateButton("Start", 232, 952, 153, 33)
GUICtrlSetFont(-1, 12, 800, 0, "Arial")
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$Preparations = GUICtrlCreateEdit("", 10, 8, 600, 450, BitOR($ES_READONLY,$WS_BORDER), $WS_EX_STATICEDGE)
GUICtrlSetData(-1, StringFormat(" Preperations:\r\n\r\n * Power supply connected\r\n * Battery load is = 100%\r\n * Only WiFi connection established\r\n\r\n ToDo:\r\n\r\n * Remove power supply\r\n * Benchmark starts automatically\r\n * Wait for "&Chr(34)&"end of benchmark"&Chr(34)&" (empty battery)\r\n * Connect power supply\r\n * Write battery life time on a paper\r\n * Reload battery to 100% and start a 2nd measurement (from point 1)\r\n * Write the average value of 1st and 2nd measurement in the\r\n device description\r\n\r\n\r\n\r\n\r\n DO NOT USE THE DEVICE WHILE THE TEST IS RUNNING!!!!"))
GUICtrlSetFont(-1, 12, 800, 0, "Arial")
GUICtrlSetColor(-1, 0x000000)
GUICtrlSetBkColor(-1, 0xFFFBF0)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlSetState(-1, $GUI_DISABLE)
$Messages = GUICtrlCreateEdit("", 10, 472, 600, 450, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$WS_BORDER,$WS_CLIPSIBLINGS), $WS_EX_TRANSPARENT)
GUICtrlSetFont(-1, 12, 400, 0, "Arial")
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$oWMP = ObjCreate("WMPLayer.ocx") ;mediaplayer-objekt erstellen -> für die Einstellungen: new-object -comobject Wmplayer.ocx | get-member in Powershell ausführen
GUICtrlCreateObj($oWMP, 630, 8, 1280, 784) ;objekt ins gui setzen und grösse angeben
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Alles anzeigen