Radiobutton inicializacion

[macrossman]

Hola tengo un problema, quiero inicializar el check del radiobutton, tengo 3. Tengo un formulario principal q llama a otro y ahi es donde intento poner radiobutton1.Checked y lo q sucede es q en el primer ingreso lo inicializa pero cuando se se presiona por ejemplo el radiobutton2 , se cierra el segundo formulario y lo abro nuevamente queda tildado el radiobutton2 no el 1. A alguien le paso? saludos

[Casimiro Noteví]

No se entiende bien lo que preguntas

[[nlsgarcia]]

macrossman,

Empezado por macrossman

,,,quiero inicializar el check del radiobutton, tengo 3. Tengo un formulario principal q llama a otro,,,

Revisa este código:

Código Delphi [-]
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

El código anterior inicia la aplicación solo con el Form1 activo.

Revisa este código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
   Application.CreateForm(TForm2, Form2);
   Form2.Show;
end;

El código anterior crea y llama a Form2 desde Form1.

Revisa este código:

Código Delphi [-]
procedure TForm2.FormCreate(Sender: TObject);
begin
   RadioButton1.Checked := True;
   RadioButton2.Checked := False;
   RadioButton3.Checked := False;
end;

procedure TForm2.FormCLose(Sender: TObject; var Action: TCloseAction);
begin
   Action := caFree;
end;

El código anterior inicializa tres controles TRadioButton en el evento OnCreate de Form2 y libera todos los recursos de este en el evento OnClose. En cada llamada a Form2 solo el control RadioButton1 estará activo al crear el formulario.

Quizás te interese revisar este link:

Setting TRadioButton to checked causes OnClick event: http://stackoverflow.com/questions/2...-onclick-event

Espero sea útil

Nelson.

[macrossman]

Gracias [nlsgarcia] tu solución fue perfecta. Saludos