ControlSend Problem

11/12/2010 06:35 Belur#46
Hier mal der Code: Wie gesagt, er sendet nicht die in der ComboBox ausgewählten Tasten sondern immer nur "C". Vllt weiß jetzt jmd weiter.

PHP Code:
#include <ButtonConstants.au3> 
#include <ComboConstants.au3> 
#include <EditConstants.au3> 
#include <GUIConstantsEx.au3> 
#include <WindowsConstants.au3> 
#Region ### START Koda GUI section ### Form= 
$Form1 = GUICreate("Form1", 630, 284, 192, 124) 
$Combo1 = GUICtrlCreateCombo("Combo1", 24, 24, 185, 25) 
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F8|F9") 
$Input1 = GUICtrlCreateInput("Input1", 224, 24, 169, 21) 
$Button1 = GUICtrlCreateButton("Button1", 408, 24, 81, 25, $WS_GROUP) 
$Button2 = GUICtrlCreateButton("Button2", 512, 24, 81, 25, $WS_GROUP) 
$Input2 = GUICtrlCreateInput("Input2", 224, 64, 169, 21) 
$Combo2 = GUICtrlCreateCombo("Combo2", 24, 64, 185, 25) 
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F8|F9") 
$Button3 = GUICtrlCreateButton("Button3", 408, 64, 81, 25, $WS_GROUP) 
$Button4 = GUICtrlCreateButton("Button4", 512, 64, 81, 25, $WS_GROUP) 
$Combo3 = GUICtrlCreateCombo("Combo3", 24, 104, 185, 25) 
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F8|F9") 
$Input3 = GUICtrlCreateInput("Input3", 224, 104, 169, 21) 
$Combo4 = GUICtrlCreateCombo("Combo4", 24, 144, 185, 25) 
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F8|F9") 
$Combo5 = GUICtrlCreateCombo("Combo5", 24, 184, 185, 25) 
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F8|F9") 
$Combo6 = GUICtrlCreateCombo("Combo6", 24, 224, 185, 25) 
GUICtrlSetData(-1, "F1|F2|F3|F4|F5|F6|F7|F8|F8|F9") 
$Input4 = GUICtrlCreateInput("Input4", 224, 144, 169, 21) 
$Input5 = GUICtrlCreateInput("Input5", 224, 184, 169, 21) 
$Input6 = GUICtrlCreateInput("Input6", 224, 224, 169, 21) 
$Button5 = GUICtrlCreateButton("Button5", 408, 104, 81, 25, $WS_GROUP) 
$Button6 = GUICtrlCreateButton("Button6", 512, 104, 81, 25, $WS_GROUP) 
$Button7 = GUICtrlCreateButton("Button7", 408, 144, 81, 25, $WS_GROUP) 
$Button8 = GUICtrlCreateButton("Button8", 512, 144, 81, 25, $WS_GROUP) 
$Button9 = GUICtrlCreateButton("Button9", 408, 184, 81, 25, $WS_GROUP) 
$Button10 = GUICtrlCreateButton("Button10", 512, 184, 81, 25, $WS_GROUP) 
$Button11 = GUICtrlCreateButton("Button11", 408, 224, 81, 25, $WS_GROUP) 
$Button12 = GUICtrlCreateButton("Button12", 512, 224, 81, 25, $WS_GROUP) 
GUISetState(@SW_SHOW) 
#EndRegion ### END Koda GUI section ### 


Dim $akt1 = False 
$iCombo1 
= GUICtrlRead($Combo1) 
$handle = WinGetHandle("FLYFF") 
$iSleep = GUICtrlRead($Input1) 
While 
1 
    $nMsg 
= GUIGetMsg() 
    Switch 
$nMsg 
        
Case $GUI_EVENT_CLOSE 
            
Exit 

            Case 
$button1 
                $akt1 
= True 
             
Case $Button2 
                $akt1 
= False 
        
EndSwitch 

        If 
$akt1 = True Then ControlSend($handle,"","", "{" & $iCombo1 & "}") 
        
Sleep($iSleep) 
EndIf 
WEnd