Скачать: CL | DM;

Как в 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;

---

← →
Chizh ©   (2003-01-16 14:30) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c