Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Pasar información de un form a otro (https://www.clubdelphi.com/foros/showthread.php?t=7239)

davidgaldo 09-02-2004 16:43:44

Pasar información de un form a otro
 
Hola tengo un dbgrid y al pinchar en una fila quiero que se me abra
otro form y se rellenen unos tedit, como hago para pasar información de un form a otro?

marcoszorrilla 09-02-2004 16:54:12

Pues es fácil:

Supongamos que los registros proceden de un Ttable, que está en el primero formulario y se llama frFormulario1

MiEdit1.Text:=frFormulario1.Table1MiCampo.Value;

Suponiendo que el campo sea de tipo texto sino habrá que aplicarle la transformación correspondiente.

MiEdit1.Text:=DatetoStr(frFormulario1.Table1MiCampo.Value);

Si la tabla o Query estuviese en un Datamodulo, lo mismo en vez del nombre del formulario pondriamos el nombre del Datamodulo.

Un Saludo.

maruenda 09-02-2004 23:32:42

mi solucion
 
mira , yo hago eso pero cuando pulso intro sobre el registro que busco.
en el evento keydown del tdbgrid
IF(INTTOSTR(KEY)='13') THEN // pulsacion de intro
begin
empresabuscada:=strtoint( REJILLAempresas.Fields[0].ASSTRING);

end;

el valor devuelto, empresabuscada, se lo paso al otro form, y con ese valor en un tquery hago una consulta, y obtengo los datos. :cool:

Lepe 10-02-2004 19:00:34

Cita:

Empezado por maruenda
mira , yo hago eso pero cuando pulso intro sobre el registro que busco.
en el evento keydown del tdbgrid
IF(INTTOSTR(KEY)='13') THEN // pulsacion de intro
begin
empresabuscada:=strtoint( REJILLAempresas.Fields[0].ASSTRING);

end;

el valor devuelto, empresabuscada, se lo paso al otro form, y con ese valor en un tquery hago una consulta, y obtengo los datos. :cool:

Ya que delphi tiene mapeada con constantes todas las teclas del teclado, podemos poner lo mismo de forma distinta:

Código:

IF key = VK_RETURN THEN // pulsacion de intro
mirar en la ayuda sobre "virtual key code" para un listado de constantes.

Es igual pero no es lo mismo ;)
Saludos.


La franja horaria es GMT +2. Ahora son las 22:32:21.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi