Criar componentes dinamicamente

Delphi

01/10/2005

Como inserir um label num groupbox dinamicamente, sendo que os dois foram também criados dinamicamente?

Obrigada




Lelê

Lelê

Curtidas 0

Respostas

Firekiller

Firekiller

01/10/2005

Se você souber pelo menos o nome do componente é só passar para a propriedade Parent (do label) o seguinte:

TGroupBox( FindComponent(´NomeDoGroup´) );


GOSTEI 0
Lelê

Lelê

01/10/2005

Olas!
Eu tentei o que vc falou e o codigo ficou assim:

Labels[cont] := TDBText.Create(application);{já criei no form e não deu}
Labels[cont].Parent := TGroupBox(FindComponent(´group1´));
Labels[cont].AutoSize := true;
Labels[cont].Font.Name := ´TimesNewRomam´;
Labels[cont].Font.Size := 10;
Labels[cont].DataSource := DBEdits[cont].DataSource;
Labels[cont].DataField := DBEdits[cont].DataField;
Labels[cont].BringToFront;
A idéia do programa é ter uma lista de DBEdits e os labels só serem
criados de acordo com o check de cada DBEdit. Meu parent estava
form2 e lógico eles apareciam no form, agora não dá pau mas eles
não aparecem
Socorro?

Obrigada




GOSTEI 0
POSTAR