CheckBox w petli for

0

Witam!!

Mam nastepujace pytanie, mam 20 check boxow i chce powiedzmy je ukryc czyli checkbox1.visible=false sprawa prosta ale jak zrobic zeby 20 check boxow sie ukrylo naraz np w petli for? da sie tak zrobic? hmm kombinowalem na rozne sposoby ale nie wyszo mi....

0

Zrób tablicę checkboxów (array of TCheckbox) i twórz w niej obiekty dynamicznie lub też przypisz elementom tablicy istniejące komponenty.

0

Albo tak:

var
  i: Integer;
  C: TComponent;
begin
  for i := 1 to 20 do
  begin
    C := Form1.FindComponent('CheckBox' + IntToStr(i));
    if C is TCheckBox then
      (C as TCheckBox).Checked := False; // np.
  end;

Notabene temat był już wielokrotnie powtarzany na forum.

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