Форум: "Основная";
Текущий архив: 2005.09.25;
Скачать: [xml.tar.bz2];
ВнизКак инвертировать выделение в lisbox е? Найти похожие ветки
← →
Гриха © (2005-09-01 07:37) [0]Сабж
← →
begin...end © (2005-09-01 08:41) [1]var
I: Integer;
begin
with ListBox do
for I := 0 to Pred(Items.Count) do
Selected[I] := not Selected[I]
end.
P.S. Конечно, свойство ListBox.MultiSelect должно быть установлено в True.
← →
КиТаЯц © (2005-09-01 08:45) [2]
procedure TMainForm.Button1Click(Sender: TObject);
var i: Integer;
begin
for I:=0 to CheckListBox1.Items.Count-1 do begin
CheckListBox1.Checked[i]:= not CheckListBox1.Checked[i];
end;
end;
← →
Гриха © (2005-09-01 08:48) [3]Все просто...
Я просто немного устал...:)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.09.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.041 c