15/08/2004

Como criar um objeto dinâmico?

Gostaria de saber como colocar em um form um botão, checkbox ou qualquer outro objeto em tempo de execução, ou seja como criar um objeto dinâmico?
Se tiver um exemplo fica melhor.


Virtual7

Respostas

15/08/2004

Carlosmielke

bom,

vc pode fazer da seguinte maneira:

procedure TForm1.Button1Click(Sender: TObject);
var
check:TCheckBox;
begin
check:=TCheckBox.Create(self);
check.parent:=self;
check.Left:=10;
check.Top:=10;
check.Caption:=´Teste´;
end;

para outros componentes funciona da mesma maneira, basta declara outras variáveis.

qualquer outra dúvidsa estamos aí!

Crlos Melke


Responder Citar

25/08/2004

Rodrigo Costa

e como faz para programar o evento OnClick deste objeto dinâmico ?????


Responder Citar