Bitbtn - 30 Апреля 2013 - Исходники Delphi

Не доступно

Опрос

Главная » » Bitbtn

01:26 Bitbtn
Компонент delphi CheckListBox — список множественного выбора. Отличие от ListBox заключается наличием рядом с каждой строкой переключателя CheckBox, облегчающий выбор сразу нескольких опций. Так же индикаторы можно переключать программно, например если список выводит данные о наличие товара на складе. Список используется для вывода данных с возможностью отметки каких-либо характеристик например можно его встретить при настройке параметров в MS Word(рис 1). Для вставки в компонент группы независимых переключателей, открываем редактор свойства Items и вводим одну или несколько строк. Эти строки будут находится справа от переключателя, и будут являться поясняющей надписи для них. свойства CheckListBox: Для примера создадим небольшую программу. Разместим компонент CheckListBox зададим ему список Items. Под ним разместим memo, в него будут выводиться выбранные элементы. И две кнопки 1 и 2. Первая будет выводить в memo выделенный синим цветом элемент, а вторая — будет выводить в memo помеченные галочкой элементы. для первой кнопки обработчик будет следующий procedure TForm8.Button1Click(Sender TObject); var I integer; begin Memo1.Clear; for I = 0 to CheckListBox1.Items.Count - 1 do begin if CheckListBox1.selected[i] then Memo1.Lines.Add(CheckListBox1.Items[i]); end; end; для второй procedure TForm8.Button2Click(Sender TObject); var I integer; begin Memo1.Clear; for I = 0 to CheckListBox1.Items.Count - 1 do begin if CheckListBox1.Checked[i] then Memo1.Lines.Add(CheckListBox1.Items[i]); end; end;
1 2 3 4 5 Категория: Для новачка \| Просмотров: 1603 \| Добавил: Reif \| Рейтинг: 0.0/0