https://foro.gambas-es.org/viewtopic.php?f=1&t=3829&p=21671#p21671
-----------------------------------
portaro
Martes, 06 May 2014, 20:11

No Veo El Resultado En La Clase Resultado.ReadOnly
-----------------------------------
Este código lo llevo haciendo dende domingo, hoy le he vuelto a meter mano pero me esta llevando buen tiempo, yo quiero poner el resultado del comando curl para http en una text area, el programa no me esta dando error sin embargo en donde tengo la textarea no me salen las lineas publicas del comando.

Ya le he dado tantas vueltas que ya no se bien que cambios hice pero ya lo reescribi varias veces, para la linea de resultado del comando y asignancion de texto.

Aver si lo termino, (sino voy haciendo algo lo que aprendo me olvido por eso voy viendo tutos y haciendo algo siempre y cuando tenga una idea de que hacer)



[code linenumbers=false syntax=gambas]

Public Sub Form_Open()

  TextAreaResultado.ReadOnly = True
End


Public Sub Button1_Click()
 Dim resultado As Process
 resultado To TextAreaResultado.ReadOnly = Exec ["curl", "https://www.kernel.org/finger_banner"] As "resultado"
 End
    Private Sub resultado_Read(resultado As String) 'saida de leitura correcta
     Print "resultado_Read & resultado"
     End

    Private Sub resultado_Error(resultado As String) 'se houver erro em leitura
     Print "resultado_Error & resultado"
     End

Public Sub resultado_Kill()
Print "Terminado"
End


Public Sub TextAreaResultado_ReadOnly()


End
[/code]


