Criando Objetos em tempo de execução

Delphi

21/10/2003

Boa tarde,

Gostaria de saber se tem alguém aí pelo fórum que saiba criar um objeto em tempo de execução.

Ex:
Eu quero, através de uma repetição baseada em um conjunto de registros de uma tabela, ir inserindo RadioButtons.

Se alguém puder me Ajudar....
Desde já, agradeço a atenção de todos.


Tectaf

Tectaf

Curtidas 0

Respostas

Centopocento

Centopocento

21/10/2003

Tomas,

Para criar objetos vc fazer utilizar o seguinte comando:

var RadioButtons: TRadioButtons;
begin
...
RadioButtons := TRadioButtons.Create(Self);
{Em lugar de Self, que ´´e o formulario atual, vc pode usar Application}
RadioButtons.Parent := pnlAtual;
{pnlAtual seria o painel onde o RadioButtons seria criado}
RadioButtons.Left := 10;
RadioButtons.Top := 10;
RadioButtons.Caption := ´Texto´;
RadioButtons.Checked := True;
...
end;

Espero te ajudado.

T+

Edgar


GOSTEI 0
Raserafim

Raserafim

21/10/2003

para deixar mais claro:

você precisa definir uma variaável do tipo de componente que quer criar, ou seja TRaioButtons. Ex:

Procedure CriarComponente;
var
Botao: TRadioButtons;
begin
Botao := TRadioButtons.Create(Self);
Botao.Parent := Form1; //indica o Parent, ou seja, onde o botao componente será criado.
Botao.Left := 10;
Botao.Top := 10;
end;


GOSTEI 0
POSTAR