Página 1 de 1

Help SEND INPUT Please

Publicado: 25 May 2011, 02:46
por Cyber90
Bueno OLa a todo ! Quiero acer una coxa...aqui os dejo una programa y si me podeis ayudar porfavor

Código: Seleccionar todo

$Form1 = GUICreate("Send Input", 264, 144, 192, 124)
$Input1 = GUICtrlCreateInput("", 8, 8, 161, 21, -1, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$Button1 = GUICtrlCreateButton("Send", 184, 8, 75, 25, $WS_GROUP)
$List1 = GUICtrlCreateList("", 8, 40, 249, 97)
GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Button1
			If $Input1 = Send($List1) Then




	EndSwitch
WEnd
Quiero que cuando le das a Send y en INPUT1 tienes escrito "AUTOIT" x ejemplo abajo en $LIST1 que me ponga lo MISMO Autoit HELP PLEASE! :smt012

Re: Help SEND INPUT Please

Publicado: 25 May 2011, 20:38
por ms999

Código: Seleccionar todo

    $Form1 = GUICreate("Send Input", 264, 144, 192, 124)
    $Input1 = GUICtrlCreateInput("", 8, 8, 161, 21, -1, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
    $Button1 = GUICtrlCreateButton("Send", 184, 8, 75, 25, $WS_GROUP)
    $List1 = GUICtrlCreateList("", 8, 40, 249, 97)
    GUISetState(@SW_SHOW)
    While 1
       $nMsg = GUIGetMsg()
       Switch $nMsg
          Case $GUI_EVENT_CLOSE
             Exit
          Case $Button1
             If GuiCtrlRead($Input1) = "autoit" Then
                GUICtrlSetData($List1 , GuiCtrlRead($Input1)&"|")
             EndIf
       EndSwitch
    WEnd
Tenes que estar mas atento... en el archivo de ayuda de GUICtrlCreateList tenes un ejemplo que muestra como agregar cosas a la lista... ademas para leer lo que esta escrito en una input o recibir el valor alojado en la mayoria de los controles tenes que usar la funcion GUICtrlRead()