Como criar um objeto dinâmico?
15/08/2004
0
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.
Se tiver um exemplo fica melhor.
Virtual7
Curtir tópico
+ 0
Responder
Posts
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
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
25/08/2004
Rodrigo Costa
e como faz para programar o evento OnClick deste objeto dinâmico ?????
Responder
Clique aqui para fazer login e interagir na Comunidade :)