Как в CheckListBox по нажатию кнопки выделить все Items ы?

← →
Chizh © (2003-01-15 22:43) [0]

У меняесть CheckListBox и кнопка SelectButton, так вот я хотел сделать, чтобы по нажатии на эту кнопель выделялись все строки, написал такой код:
procedure TMainForm.SelectButtonClick(Sender: TObject); begin CheckListBox.SelectAll; end;
... но почему-то не сработало. Подскажите, пожалуйста, что нужно исправить в моём коде, или предложите свои идеи. Зарание благодарен.

← →
TTCustomDelphiMaster © (2003-01-15 23:12) [1]

Не знаю как в D6, в D5 с помощью цикла

← →
ska (2003-01-16 03:17) [2]

Ага, именно с помощью него:

procedure TForm1.Button1Click(Sender: TObject);
Var i:integer;
begin
For i:=0 to CheckListBox1.Items.Count-1 Do
Begin
CheckListBox1.Checked[i]:=true;
End;
end;

Всем спасибки, вопрос исчерпан :-)

Как в CheckListBox по нажатию кнопки выделить все Items ы? Найти похожие ветки