Thema: Delphi CheckListBox

Einzelnen Beitrag anzeigen

Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#2

Re: CheckListBox

  Alt 1. Nov 2009, 10:48
Delphi-Quellcode:
var
  i, n : integer;
begin
  n := 0;
  for i := 0 to CheckListBox.Items.Count - 1 do
    if CheckListBox.Checked[i] then inc(n);

  showmessage(inttostr(n) + ' Checked.');
end
So oder mal in der Onlinehilfe stöbern.
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat