[Delphi] Jak w petli odwolac sie do wszystkich komponentow T

0

Jak w temacie. [???]

0

var I:Integer;
...
for I:=0 to ControlCount - 1 do
if Control[I] is TLabel then //Coś tam...

0

THNX:)

0

Za wczesnie podziekowalem, nie dziala mi to, moze czegos jeszcze nie robie tak jak powinienem??????????

0

spróbuj tak

for i:=0 to ComponentCount-1 do
if components[i] is TLabel then
TLabel(Components[i]).Caption := 'A kuku';

0

if components[i] is TLabel then
TLabel(Components[i]).Caption := 'A kuku';

albo then
(Component[i] as TLabel).Caption:='A kuku';

1 użytkowników online, w tym zalogowanych: 0, gości: 1