Saludos, Tengo un pequeño problema, ya que al crear un form necesito pasarle un parametro para que Lea ciertas configuraciones de un archivo ini.
Desde el Form Principal creo el Form (Que se crea varias veces pero con diferentes parametros)
Código Delphi
[-]procedure TFrmMain.BtnFrm2Click(Sender: TObject);
Var
F2: TForm1;
begin
F2 := TForm1.Create(Self);
F2.Parametro := 'Soy el Form 2';
F2.Caption:='Soy el Form 2'; F2.Show;
F2.Free;
end;
Y en el create del form hago esto para ver el parametro
Código Delphi
[-] public
Var
Parametro:String;
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowMessage('Parametro= '+Parametro ); with TIniFile.Create( allusers+'opciones.ini') do
try
Pc:= (ReadString(Parametro,'Parametro','Parametro_De_Form'));
finally
Free;
end;
end;
Tambien e probado poniendolo en el evento OnShow y tampoco me muestra el parametro!!!
Saludos