Ograniczona ilość zaznaczonych checkbox'ów

0

Witam. Piszę bota który będzie za mnie wykonywał robotę, kiedy mnie nie będzie w domu. Ale mniejsza o to. Zrobiłem w nim coś takiego, że zaznaczam checkboxy które chcę żeby wykonywał, ale chciałbym ograniczyć ilość możliwych zaznaczonych checboxów do 3. Wiem że istnieje taka możliwość, bo podczas szukania odpowiedzi na moje pytanie, jeden forumowicz o tym wspominał. Proszę o pomoc w mojej sprawie.

1

Zadeklaruj w klasie formularza prywatną zmienną przechowującą ilość zaznaczonych CheckBox; jak zaznaczasz jakiś to sprawdzaj ile jest zaznaczonych i jeżeli jest trzy to nie zaznaczaj tego CheckBox'a, jak jest mniej to zaznacz i inkrementuj tą zmienną; Zaprogramuj jedno zdarzenie i podepnij pod wszystkie komponenty (skorzystaj z argumentu Sender a ominiesz oprogramowywanie każdego komponentu osobno); Przy odznaczaniu analogicznie dekrementuj zmienną;

0

kurcze rozumiem o co chodzi, ale nie do końca wiem jak to zrobić z Sender

0

Pisane z głowy:

procedure TMainForm.CheckBox1Click(Sender: TObject);
begin
  { tak się operuje na Sender, jeżeli jest z klasy TCheckBox }
  { odznaczenie klikniętego CheckBox }
  TCheckBox(Sender).Checked := False;
end;

Zrób zmienną i napisz kod, jak nie będzie działał to napisz; Idę spać...

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