Como indetificar la secuencia de objetos de un .exe en vb 6.0

[olve]

Dessa gracias x el ejemplo y eso es lo q quiero pero veo q utilizas la api SetWindowPos, el exe al que le quiero mandar los textos no tiene programada esta api y no tengo los ejecutables como lo puedo lograr ???????



Saludos...

[Dessa]

SetWindowPos no tiene nada que ver en el código, la usé en los dos exes solamente para que queden los dos Form en primer plano y los puedas ver mas facil .

PD: los mensajes al segundo ejecutable van a llegar igual, aun si esta minimizado u oculto ya que estan llegando por Handdle. (no por posicion)

[olve]

realizando otra prueba dejando en blanco la opcin text en blanco no le anecuentra

text1    text1.tex = ""


Otra opcion,

Saludos y GRacias

[Dessa]

No te entendí la pregunta o el errror

[olve]

No me explique, aver si ahora si 


Hwndl = FindWindow(vbNullString, "Alberto Olvera")

LsTexto1 = FindWindowEx(Hwndl, 0, vbNullString, "Text1") ' contenido string de Text1 en el exe2

En el objeto Text1 del exe2, si le asigno a la propiedad text nada(text1.text = "")no encuentra el Hwndl

a q se debe ????


espero ser claro

[seba123neo]

No me explique, aver si ahora si 


Hwndl = FindWindow(vbNullString, "Alberto Olvera")

LsTexto1 = FindWindowEx(Hwndl, 0, vbNullString, "Text1") ' contenido string de Text1 en el exe2

En el objeto Text1 del exe2, si le asigno a la propiedad text nada(text1.text = "")no encuentra el Hwndl

a q se debe ????


espero ser claro

no puede ser, yo lo pruebo, borro todo lo que hay en los textbox del exe2 y me manda los datos igual...

[Dessa]

A ver, a mi igual que a Seba, los mensajes me llegan en todos los casos y no me tira ningun error.

Olve, si lo que queres (creo) es borrar el contenido de los 3 Text del segundo ejecutable cuando este se inicia:

Deja (en diseño del segundo ejecutable) la propiedad Text tal cual, "Text1" "Text2"  y "Text3" (para que lleguen los mensajes), luego en en load (tambien del del segundo Ejecutable) agregas estas tres lineas:

Text1.Text = ""
Text2.Text = ""
Text3.Text = ""

Nota: en el primer ejecutable no cambias nada, los mensajes siguen siendo para "text1" "Text2" y "text3"


Era eso ???

[olve]

El detalle q te comento es cuando en dieño (segundo ejecutable) dejo en blanco la propiedad text ya no llegan los nemsajes este es el detalle

como tu lo mancionas:
Deja (en diseño del segundo ejecutable) la propiedad Text tal cual, "Text1" "Text2"  y "Text3" (para que lleguen los mensajes),

pero si yo dejo:

En (en diseño del segundo ejecutable) la propiedad Text  "" ""  y "" (asi ya NO llegan los mensajes)


porque ???

[Dessa]

ejemplo 1)  cambias  la propiedad Text del Text1 (en diseño del segundo exe) por  y

En este tambien tenes que cambiar el mensaje del primer exe:
LsTexto1 = FindWindowEx(Hwndl, 0, vbNullString, "y") ' contenido strng de Text1 en el exe2




ejemplo 2)  cambias  la propiedad Text del Text1 (en diseño del segundo exe) por  "y"

En este otro tambien tenes que cambiar el mensaje del primer exe:
LsTexto1 = FindWindowEx(Hwndl, 0, vbNullString, """y""") ' contenido strng de Text1 en el exe2

[olve]

Lo q pasa, es q le quiero mandar mensajes a un exe de vb 6.0 del cual no tengo codigo fuente y la unica opcion es atravez de otro (este q estoy tratando de hacer)

lo primero q tengo q hacer es tener el orden de los text, los cuales  esta en blanco lo se por medio del SPY++ de Microsof es por eso el primer codigo q te envie

a la mejor lo estoy haciendo mal y existe otra forma de hacer ???

podras orientarme ??????


Gracias x el tiempo