Cesar Picazo
30 de Diciembre del 2002

Un pequeña pregunta, Alguien a tenido la necesidad de crear en tiempo de ejecución crear variables, estas pueden ser texto, imagen o botones.

ya estoy utilizando las propiedades variable.create(); pero estas deben estar creadas en codigo.
var
boton :tbutton;
ed : tdbedit;


Sin más por el momento me despido.

Diego Romero
30 de Diciembre del 2002

procedure TForm1.ClickdelBoton(Sender: TObject);
begin
ShowMessage('Click!');
end;

procedure TForm1.FormClick(Sender: TObject);
var
Boton:TButton;
begin
Boton:=TButton.Create(Self);
Boton.Top:=10;
Boton.Left:=10;
Boton.Parent:=Form1;
Boton.OnClick:=ClickdelBoton;
end;

ClickdelBoton declaralo en la private del TForm1 y no olvides que debes llamar el evento Free del Tbutton cuando dejes de usarlo.