Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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.044 c
14-1125399088
Игорь Шевченко
2005-08-30 14:51
2005.09.25
Читать. Просветляться.


3-1123759223
Juice
2005-08-11 15:20
2005.09.25
Join с параметром ХП


2-1124305845
Привет
2005-08-17 23:10
2005.09.25
Динамическое создание кнопок


2-1123913890
Гость22
2005-08-13 10:18
2005.09.25
Paradox to Firebird?


1-1125579886
All2000
2005-09-01 17:04
2005.09.25
dll и callback





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский