FoxPro/Visual FoxPro - devolverse a otro form sin perder la informacion del primero form vfp

Buen día

muchachos urgente como hago devolverse a otro form sin perder la información registrada del primero form vfp 6.0

actualmente ejecuto un formulario donde tarer unos registros de una tabla al ejecutar el botón que me envía al segundo formulario me lo abre sin problemas pero al dar click en el botón que coloque para devolverme al primero formulario ya me borro toda la informacion que había encontrado .

AUXILIOO

puedes postear la codificacion del boton que dices envias al segundo form?/ adivinos no hay por aca.......

si discúlpame anexo el codigo del form1 y del form2

EN FORM 1 CONTIENE



THISFORM.TEXT1.VALUE = BASECARGUE.nombre// text1 que contiene un nombre que me trae de una tabla de manera correcta
THISFORM.TEXT2.VALUE = BASECARGUE.apellido//text2 qute contiene un apellido e que me trae de una tabla de manera correcta


Tengo un Boton que me pasa al form2 en evento CLICK Tengo :

do form form2
____________________________________________________________________
Dentro del form2 tengo Boton que me devuelve al form1 en evento CLICK Tengo

do form form1//pero al devolverme al form1 me borra la información que se encuentra en el text1 y del text2 queda en blanco estos dos campos.

Pretendes retornar al form1 cuando estás creando una nueva instancia del form1. Por eso se pierden tus datos.
Si el formulario original desaparece, tal vez estés utilizando alguna variable pública y la cláusula NAME para instanciarlo. De lo contrario debería subsistir.


Lo correcto sería algo así

1) Al llamar desde el form1 al form2
DO FORM2 WITH THISFORM && fijate que es sin puntos y sin comillas

2) Init del form2
LPARAMETERS toForm && RECIBE COMO PARÁMETRO LA REFERENCIA AL OBJETO FORM
Addproperty(Thisform,"oform",toForm) && CREA UNA PROPIEDAD EN EL FORM LLAMADA "OFORM"

3) En el botón de regreso
Thisform.Release

4) Para regresar al form1
* Evento Destroy del Form2 * También puede ir en el evento Unload
IF VARTYPE(THISFORM.OFORM)= "O"
thisform.oform.Text1.SetFocus (Suponiendo que quieres apuntar al text1)
ENDIF

Dario, podrias subir los 2 forms y la tabla que usas, todos en formato RAR? Me parece que lo estas llamando mal, tratare de corregirlo y luego, te lo devuelvo funcionando.....

gracias Mauricio te adjunto el archivo en formato RAR

al ejecutar el los form te darás cuenta que el primero coloco un id ejemplo "83258482" y le doy click en buscar .

me trae el nombre de manera exitosa, sin embargo me paso al form2 y le doy click para devolverme al form1 y ya se borro la información del nombre y del id que habían encontrado.

• nombre.rar(4,1 MB)

Dario, aca esta ya modificado, le hice ciertas modificaciones: el FORM1, cuando llamas al FORM2 hago invisible el FORM1
Ejecutalo y comenta. Crea una carpeta llamada Dario, alli bajas el RAR, lo desempacas y lo ejecutas.
Gracias.....

• Dario.rar(4,1 MB)

Muchas gracias ya me quedo claro!!