[Delphi] odwołanie do komponentów

0

Witam
Jak odwołać się do wszytkich komponentów (typu np. Tlabel) znajdujących się na innej formie lub na zakładkach PageControl

Pozdrow from lusio

0

Form2.Label1, jesli znasz nazwy komponentow (nie zapomnij o dodaniu modulu w ktorym jest Form2 do listy uses)
Jesli nie znasz nazw, uzyj FindComponent--Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

0

jezeli chcesz odwolac sie do wszystkich TLabel np na Form1:

var
i: Integer;
begin
for i:=0 to Form1.ComponentCount-1
do if Form1.Components[i].ClassType=TLabel
then with Form1.Components[i] as TLabel
do begin
{TU UMIESC CO MA SIE STAC Z KAZDYM LABELem NP: }

              Caption:=Name;                 
             end;

end;

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