Problemas con RadioButton

[kainchu3102]

Buenas gente, tengo el siguiente problemas estaria necesitando ayuda,

Mi problema es el siguiente cuando selecciono un Radiobutton esta todo perfecto hasta ahi, mi problema se genera cuando utilizo en evento onclose de formulario. cierro el formulario, lo vuelvo abrir desde un boton con ShowModal y el Radiobutton sigue seleccionado
ya intente de todo pero no puedo hacer que el chequeo del radio se haga falso,

intente llamando al foormulario de nuevo de esta manera y nada:

procedure TFORMEMPLEADOS.Modificar1Click(Sender: TObject);
begin
FORMABMEMPLEADOS.RadioButton3.Checked := False;

FORMABMEMPLEADOS.ShowModal;


Tambien intente desde el evento onclose y nada:

procedure TFORMABMESTUDIOS.FormClose(Sender: TObject; var Action: TCloseAction);
begin
FORMESTUDIOS.ID_ESTUDIO := 0;
RadioButton3.Checked := False;
end;


Desde ya muchas gracias por su ayuda

[APO]

Mira de quitar cualquier foco que tengas en el código, ya que al darle el foco automáticamente se selecciona.

Mira si tienes algo así, y prueba a comentarlo:

RadioButton3.SetFocus;

[Dexter182]

Suscribo a lo que dice APO.
Seguramente el problema esté en el evento FormShow de ese formulario.

Caso contrario, prueba de escribir en ese evento la línea problemática:
RadioButton3.Checked := False;

Saludos! ^\||/

[movorack]

Hola kainchu3102

Si es un modal, imagino que solo sirve para mostrar o capturar algunos datos y no necesitas que esté creado todo el tiempo. Por lo tanto podrías crear y liberar el formulario en cada llamado


procedure TForm1.CapturarDatosEmpleadosClick(Sender: TObject);
var
FrmEmpl: TFormEmpleados;
begin
FrmEmpl:= TFormEmpleados.Create(Self);
try
//Aquí puedes manipular FrmEmpl antes de ser visualizado.
if FrmEmpl.ShowModal = mrOk then
begin
//Aquí capturas los valores de las variables que tienes en el FrmEmpl
end;
finally
FrmEmpl.Free;
end;
end;

[Neftali [Germán.Estévez]]

Bienvenido a los foros [kainchu3102].
por favor, revisa la guía de estilo (https://www.clubdelphi.com/foros/guiaestilo.php) y utiliza TAG's cuando escribas código (http://tinyurl.com/bvzsyhb).