Restauras Valores de un Form.

[ZiriusB]

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]

Perdon el codigo es asi:

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

[marcoszorrilla]

Empezado por ZiriusB

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]

¿Como llenas los datos del formulario que llamas?

[JoseAntonio]

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]

Empezado por JoseAntonio

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]

Empezado por ZiriusB

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]

Empezado por Aleca

¿Como llenas los datos del formulario que llamas?

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]

Empezado por ZiriusB

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.