Typecast dentro de um TGroupbox

Question

Oi Galera estou tenando percorrer os componentes dentro de um Groupbox a unica forma que encontrei foi com ControlConunt nao consegui fazer isso com ComponentCount  lembrando que isso seria somente de...

Fabriciocolombo · Answer

No trecho que vc postou, vc est� usando o Controls[i] do Form, e n�o do GroupBox.

procedure tform1.carregadados; 
EndPadrao : array[0..10] of string; 
i: Integer; 
begin 
for I := 0 to GroupBox1.ControlCount - 1 do 
begin 
if ([b]GroupBox1.[/b]Controls[i] is TEdit) then 
EndPadrao[i] := ([b]GroupBox1.[/b]Controls[i] as TEdit).Text; 
end; 
end;

Woinch · Answer

Ou voc� pode fazer com o ComponentCount verificando se a propriedade Parent do Componente � o GroupBox que voc� quer pegar os filhos dele!...

F�rum Typecast dentro de um TGroupbox #367803