Crear formularios de forma dinamica

[dec]

Hola,

Tienes que asignarle un "Parent" a los "Edit".

Código Delphi [-]
txt.Parent := Form3;

Para asignar un evento has de hacer lo mismo que para el resto de propiedades, cuidándote de que el método que asignes tenga el mismo "prototipo" que el evento al que quieres asignarle.

Por ejemplo, en el caso de "OnClick" el prototipo es:

Código Delphi [-]
Onclick: TNotifyEvent;

Siendo "TNotifyEvent":

Código Delphi [-]
TNotifyEvent = procedure(Sender: TObject) of object;

Es decir, que para asignar al evento "OnClick" un método este tendría que ser declarado así, por ejemplo, en la clase "TForm3":

Código Delphi [-]
interface

type
  TForm3 = class(TForm)
  {...}
  private
    procedure ParaHacerClick(Sender: TObject);
  {...}
  end;

He implementado así:

Código Delphi [-]
procedure TForm3.ParaHacerClick(Sender: TObject);
begin
  //
end;

Ese método puedes ya asignarlo sin problemas al evento "OnClick" del botón que crees, ya digo, como si fuera una propiedad más:

Código Delphi [-]
btn := TButton.Create(Form3);
btn.OnClick := ParaHacerClick;
{...}