Como funciona de la API Enumchildproc ??????

Iniciado por olve, 12 Octubre 2009, 04:17 AM

0 Miembros y 2 Visitantes están viendo este tema.

olve

Dessa,

Si lo modifico


te envio este codigo al parecer ya lo hace en orden lo unico q hice es cambiar el orden de la asignacion de los textos:


sera lo correcto ?????


  Hwndl = FindWindow(vbNullString, "AA")

  LsTexto1 = FindWindowEx(Hwndl, 0, "ThunderRT6TextBox", vbNullString)
  LsTexto2 = FindWindowEx(Hwndl, LsTexto1, "ThunderRT6TextBox", vbNullString)
  LsTexto3 = FindWindowEx(Hwndl, LsTexto2, "ThunderRT6TextBox", vbNullString)
  LsTexto4 = FindWindowEx(Hwndl, LsTexto3, "ThunderRT6TextBox", vbNullString)
 
  Call SendMessage(LsTexto1, WM_SETTEXT, 0, ByVal Text4.Text)
  Call SendMessage(LsTexto2, WM_SETTEXT, 0, ByVal Text3.Text)
  Call SendMessage(LsTexto3, WM_SETTEXT, 0, ByVal Text2.Text)
  Call SendMessage(LsTexto4, WM_SETTEXT, 0, ByVal Text1.Text)



Dessa

Exactamente a eso iva (OrderZA) o sea que el primer Handle que aparece es el del ultimo textbox que se agregó al programar, pero lo mejor era que entiendas ese ordenamiento por vos mismo al listarlo con EnumChildWindows (ahora lo dije bien  :xD), eso te serviría para cuando tengas que modificar aplicaciones con Hwdl de controles no tan dirictos como este.

:D
Adrian Desanti


olve

Hola, Dessa

Espero me puedas orientar como puedo mandar mesages desde vb 6.0 a un apagina de internes (escribir texto a un texto de una pagina Web).


Que herramientas serian las mas optimas ???



Saludos

seba123neo

Cita de: olve en 17 Octubre 2009, 01:02 AM
Hola, Dessa

Espero me puedas orientar como puedo mandar mesages desde vb 6.0 a un apagina de internes (escribir texto a un texto de una pagina Web).


Que herramientas serian las mas optimas ???



Saludos

no entiendo que queres hacer, escribir donde ??
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

olve

Seba

Lo que quiero hacer es mandar una cadena de un text de VB 6.0 a un text de un a pagina web.

ejem.

cadena = "AOJ"
text1.text = Cadena  (Exe vb6.0)  y al dar click a un command lo envie la cadena a una pagina web (Cadena llegue al text de la pagian Web)

me explico.




seba123neo

deberias plantear las dudas en otro post porque esto no tiene nada que ver con el tema principal del topic. ya hay ejemplos de eso en el foro, pero bueno es algo asi, pones un webbrowser y haces:

Código (vb) [Seleccionar]
WebBrowser1.Document.nombredelformularioweb.nombredelcontroltextboxweb.Value = Text1.Text
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson