Realmente aprendí delphi al vuelo y nunca aprendí el manejo de constructores y esas cosas. Bueno el problema es lo siguiente, a ver si puedo explicarme. Tengo un formalario llamemosle Form1, en donde tengo dos botones, en el evento onClick, de cada boton crean y muestran otro formulario en tiempo de ejecucion, por lo que necesito que dependiendo del boton pulsado el formulario creado reciba como parametro un valor que le madara el boton respectivo
tengo algo asi declarodo en el form1
Código Delphi
[-]
Public
ClaseForma : TFormClass;
end;
procedure TForm1.Button1Click(sender : tobject);
begin
claseForma.Create(nil).ShowModal;
end;
Mi problema es que necesito que este formulario reciba dos parametros, es decir que el constructor create, pueda recibir parametros como algo asi:
Código Delphi
[-]
constructor TCustomForm.Create(AOwner: TComponent, Parametro1: String, Parametro2: String);
Para que cuando lo invoque pueda hacerlo asi:
Código Delphi
[-]
procedure TForm1.Button1Click(sender : tobject);
begin
claseForma.Create(nil, 'Boton1','Valor1').Showmodal;
end;
procedure TForm1.Button2Click(sender : tobject);
begin
claseForma.Create(nil, 'Boton2','Valor2').showmodal;
end;
Como que tengo la idea, ya que estoy revisando el codigo del Unit Forms, pero no se como armar la nueva unidad que creara el formulario. Tomo un curso de delphi mejor o creen que pueda encontrar algo por aqui??
De antemano muchas gracias