Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Restauras Valores de un Form. (https://www.clubdelphi.com/foros/showthread.php?t=71316)

ZiriusB 13-12-2010 14:41:26

Restauras Valores de un Form.
 
Hola amigos, tengo una aplicacion con base de datos de donde selecciono un registro de un dbgrid, esto me lleva a un form con algunas labels y combobox, al seleccionar un combobox cambio el color de la label que le corresponde, tengo un boton de VOLVER, con el que vuelvo al form del dbgrid para seleccionar otro registro, el problema es que al seleccionar otro registro se me abre el form con todo como lo seleccione en el registro anterior, utilizo el CLOSE;

Código Delphi [-]
procedure Tasisadmin.btcerrar(Sender: TObject);
begin
form12.Show;
asisadmin.Hide;
end;

Como hago para que me restaure los valores predeterminados para cada registro...

Espero poder contar con su ayuda, gracias!

ZiriusB 13-12-2010 15:51:45

Perdon el codigo es asi:

Código Delphi [-]
procedure Tasisadmin.btcerrar(Sender: TObject);
begin
form12.Show;
asisadmin.Close;
end;

marcoszorrilla 13-12-2010 15:55:04

Cita:

Empezado por ZiriusB (Mensaje 384820)
Perdon el codigo es asi:

Código Delphi [-]
 procedure Tasisadmin.btcerrar(Sender: TObject); 
begin 
form12.ShowModal; 
end;

Si vas a volver al Formulario lo lógico es dejarlo abierto, así no tienes que hacer nada.

Un Saludo.

Aleca 13-12-2010 16:25:09

¿Como llenas los datos del formulario que llamas?:confused:

JoseAntonio 13-12-2010 17:56:52

ZiriusB:

No solo debes cerrar el formulario sino tambien liberarlo, utiliza el evento onclose y escribes ahi action := cafree; esa es una de las tantas formas de liberar el formulario, al momento de llamar al formulario nuevamente (o por primera vez) tambien deberias crearlo desde cero salu2

ZiriusB 13-12-2010 18:25:12

Cita:

Empezado por JoseAntonio (Mensaje 384835)
ZiriusB:

No solo debes cerrar el formulario sino tambien liberarlo, utiliza el evento onclose y escribes ahi action := cafree; esa es una de las tantas formas de liberar el formulario, al momento de llamar al formulario nuevamente (o por primera vez) tambien deberias crearlo desde cero salu2

Me lanza un error al volver a llamarlo:

"Access violation at adress 0000000000 violation adress 000000000000"

Aleca 13-12-2010 19:55:47

Cita:

Empezado por ZiriusB (Mensaje 384838)
Me lanza un error al volver a llamarlo:

"Access violation at adress 0000000000 violation adress 000000000000"

lo tenes que volver a crearlo como la primera vez.

ZiriusB 16-12-2010 20:28:37

Cita:

Empezado por Aleca (Mensaje 384822)
¿Como llenas los datos del formulario que llamas?:confused:

Como que como los lleno?

Los combobox no se guardan solo el resultado...

Los labels cambian de color para decirle al usuario que esa caracteristica ya la evaluo, lo que quiero es que al salir de ese formulario y volverlo a llamar (sin cerrar la aplicacion) los valores de los labels y los combobox esten por defecto!

Aleca 16-12-2010 22:39:09

Cita:

Empezado por ZiriusB (Mensaje 385185)
Como que como los lleno?

Los combobox no se guardan solo el resultado...

Los labels cambian de color para decirle al usuario que esa caracteristica ya la evaluo, lo que quiero es que al salir de ese formulario y volverlo a llamar (sin cerrar la aplicacion) los valores de los labels y los combobox esten por defecto!

Por lo que entendí en tus posts anteriores tenes que hacer lo siguiente
Código Delphi [-]
procedure Tasisadmin.btcerrar(Sender: TObject);
begin
  Form12 := TForm12.Create(Application);
  Form12.ShowModal;
  Form12.Destroy;
end;
de esta forma te aseguras que te aparezca el form como lo creaste.:D


La franja horaria es GMT +2. Ahora son las 04:57:02.

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