Fórum Criar componentes dinamicamente #298011
01/10/2005
0
Como inserir um label num groupbox dinamicamente, sendo que os dois foram também criados dinamicamente?
Obrigada
Lê
Obrigada
Lê
Lelê
Curtir tópico
+ 0
Responder
Posts
01/10/2005
Firekiller
Se você souber pelo menos o nome do componente é só passar para a propriedade Parent (do label) o seguinte:
TGroupBox( FindComponent(´NomeDoGroup´) );
TGroupBox( FindComponent(´NomeDoGroup´) );
Responder
Gostei + 0
07/10/2005
Lelê
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
Lê
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
Lê
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)