Hallo Community,
habe immer wieder folgendes Problem:
Wenn ich zwei GUIs aufbaue, dann funktionieren in der einen GUI, aus welchen Gründen auch immer die Tasten wie Tabulator-Taste zum springen zwischen den Controls oder drücken der Enter- und ESC-Tasten nicht. Vielleicht / bestimmt mache ich da was falsch...
Womit hängt es hier in dem Code zusammen, dass es nicht funktioniert?
C
#include <GuiEdit.au3>
#include <EditConstants.au3>
#include <WinAPIIcons.au3>
#include <GuiStatusBar.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
CreateFirstFenster()
CreateSecondFenster()
Func CreateSecondFenster()
Local $hGui = GUICreate("XYZ", 370, 130)
Local $Label = GUICtrlCreateLabel("Bitte eine Auswahl treffen und auf weiter klicken", 15, 80, 280)
GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
Local $comboLang = GUICtrlCreateCombo("", 10, 20, 350, 20)
GUICtrlSetData($comboLang, 'Eins|Zwei|Drei|Vier', 'Eins')
Local $comboVal = GUICtrlCreateCombo("", 10, 50, 350, 20)
Local $Close = GUICtrlCreateButton("Beenden", 245, 100, 115, 25)
Local $idWeiter = GUICtrlCreateButton('Weiter', 10, 100, 115, 25)
GUISetState(@SW_SHOW, $hGui)
While True
Switch GUIGetMsg()
Case -3, $GUI_EVENT_CLOSE, $Close
Exit
Case $comboLang
Case $comboVal
Case $idWeiter
Global $Copyright = GUICtrlRead($comboVal)
GUISetState(@SW_HIDE, $hGui)
GUIDelete($hGui)
ExitLoop
EndSwitch
WEnd
EndFunc
Func CreateFirstFenster()
Local $hIcons[2]
Local $oIE = _IECreate("", 1, 0, 1, 0)
Local $oIE = _IECreateEmbedded()
Local $Form1 = GUICreate("", 1232, 660, -1, -1, $WS_SYSMENU)
Local $Fenstergroesse = WinGetPos($Form1)
$IE_1_GUI = GUICtrlCreateObj($oIE, 0, 0, 1224, 435)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKRIGHT + $GUI_DOCKTOP + $GUI_DOCKBOTTOM)
_IEPropertySet($oIE, "statusbar", 1)
Local $aText2[3] = [@TAB & "", @ScriptDir, @TAB & ""]
Local $aParts2[2] = [120, 600]
$Status = _GUICtrlStatusBar_Create($Form1, $aParts2, $aText2)
$hIcons[0] = _WinAPI_LoadShell32Icon(23)
$hIcons[1] = _WinAPI_LoadShell32Icon(40)
_GUICtrlStatusBar_SetIcon($Status, 0, $hIcons[0])
_GUICtrlStatusBar_SetIcon($Status, 1, $hIcons[1])
$iInformationsFeldLinks = GUICtrlCreateEdit("", 0, 440, 600, 167.5, $ES_AUTOVSCROLL + $WS_VSCROLL)
_GUICtrlEdit_LineScroll($iInformationsFeldLinks, 1, 0xfffffff)
GUICtrlSetColor($iInformationsFeldLinks, 0x00FF00)
GUICtrlSetBkColor($iInformationsFeldLinks, 0x000000)
$iInformationsFeldRechts = GUICtrlCreateEdit("", 600, 440, 1226 - 600, 167.5, $ES_AUTOVSCROLL + $WS_VSCROLL)
_GUICtrlEdit_LineScroll($iInformationsFeldRechts, 1, 0xfffffff)
GUICtrlSetColor($iInformationsFeldRechts, 0x00FF00)
GUICtrlSetBkColor($iInformationsFeldRechts, 0x000000)
GUISetState(@SW_SHOW, $Form1)
EndFunc
Alles anzeigen
Danke vorab!