Двойное оплодотворение у цветковых растений: Оплодотворение - это процесс слияния мужской и женской половых клеток с образованием зиготы...
Состав сооружений: решетки и песколовки: Решетки – это первое устройство в схеме очистных сооружений. Они представляют...
Топ:
Техника безопасности при работе на пароконвектомате: К обслуживанию пароконвектомата допускаются лица, прошедшие технический минимум по эксплуатации оборудования...
Методика измерений сопротивления растеканию тока анодного заземления: Анодный заземлитель (анод) – проводник, погруженный в электролитическую среду (грунт, раствор электролита) и подключенный к положительному...
Характеристика АТП и сварочно-жестяницкого участка: Транспорт в настоящее время является одной из важнейших отраслей народного...
Интересное:
Финансовый рынок и его значение в управлении денежными потоками на современном этапе: любому предприятию для расширения производства и увеличения прибыли нужны...
Уполаживание и террасирование склонов: Если глубина оврага более 5 м необходимо устройство берм. Варианты использования оврагов для градостроительных целей...
Искусственное повышение поверхности территории: Варианты искусственного повышения поверхности территории необходимо выбирать на основе анализа следующих характеристик защищаемой территории...
Дисциплины:
2017-06-02 | 320 |
5.00
из
|
Заказать работу |
Содержание книги
Поиск на нашем сайте
|
|
· После установки Свойства Column в число, отличное от 0, элементы в списке будут сворачиваться в несколько колонок в зависимости от введенного числа.
· Если свойство MultiSelect установлено в True, то появляется возможность выбора нескольких элементов из списка, удерживая SHIFT и выполняя непрерывную выбору. Для прерывистой выборки элементов надо использовать Ctrl.
· Если свойство Sorted установлено в True, то во время выполнения программы производится сортировка списка.
Отображение полей со списком ComboBox
Так же как и ListBox, ComboBox отражает на форме список вариантов, но имеет присоединенное окно Edit, применяемое при выборе. Важным свойством ComboBox является то, что этот элемент экономит пространство на форме.
Инициализация, т.е. создание элементов списка такое же, как и в ListBox:
1.
procedure Tform1.FormCreate(Sender: Tobject);
Begin
ComboBox1.Items.Add (‘Apples’);
ComboBox1.Items.Add (‘Apes’);
end;
2. Íà ôîðìå âûäåëèòü ComboBox и в Object Inspector на вкладке Propierties справа от свойства Items дважды кликнуть. При этом происходит переход в редактор, где каждая строка будет являться одним элементом списка.
3. ComboBox обладает теми же свойствами, что и ListBox: Column, MultiSelect Sorted
Пример использования ComboBox
Задача: создать на форме ComboBox и при нажатии кнопки вывести значение выбранного элемента из списка.
1. Создать на форме 1 ComboBox b 1 Button.
2. Одним из способов заполнить список несколькими элементами.
3. Для кнопки написать следующий код:
procedure TForm1.Button1Click(Sender: TObject);
Begin
showmessage(combobox1.text);
end;
4. F9.
Результат выборки:
Использование флажков CheckBox
Флажки CheckBox представляют собой элемент управления. При работе программы, если выполнить щелчок на флажке, внутри него появится пометка о том, что этот элемент выбран. При повторном щелчке на флажке внутри него пометка удаляется и выборка этого элемента упрвления отменяется.
|
Примечание: При наличие на форме нескольких CheckBox можно использовать или один из них, или несколько, или все, или ни одного.
Пример использования CheckBox
(На использование оператора IF)
· Создать новое приложение.
· Поместить в него из Standart два чекбоксера и 4 кнопки, без изменения их имен.
· Дважды щелкнуть в форме по каждой кнопке для добавления обработчика событий OnClick и входа в редактор.
· Набрать в редакторе для первой кнопки:
Procedure TForm1.Button1Click (Sender: TObject);
Begin
if CheckBox1.Checked then ShowMessage (‘ Check Box 1 is checked ‘);
end;
Теперь, если щелкнуть по кнопке 1 когда помечен 1-ый чекбокс, то программа покажет окно с сообщением “CheckBox 1 is checked”.
Здесь функция ShowMessage используется для выдачи короткого сообщения.
· Теперь для кнопки 2 введем следующие команды:
Procedure TForm1.Button2Click (Sender: TObject);
Begin
If CheckBox2.Checked
then ShowMessage (‘ Check Box 2 is checked ‘)
else ShowMessage (‘ Check Box 2 is not checked’);
end;
Перед else; не ставится.
Операторы IF могут быть более сложными.
· Для кнопки 3 реализуем в редакторе:
Procedure TForm1.Button3Click (Sender: TObject);
Begin
if (CheckBox1.Checked and CheckBox2.Checked)
then ShowMessage (‘ Both checkboxes are checked ‘);
end;
· Для кнопки 4 реализуем:
Procedure TForm1.Button4Click (Sender: TObject);
If CheckBox1.Checked then
If CheckBox2.Checked then
ShowMessage (‘ Check Box 1 and 2 are checked ‘)
Else
Show Message (‘ Only Check Box 2 is Checked ‘)
Else
Show Message (‘ Check Box 1 is not checked, who cares for Check Box 2 ‘)
end;
Отображение взаимоисключающих вариантов RudioButton
Их так же называют зависимыми переключателями.Они обеспечивают возможность отображения программных опций пользователя, причем за один раз можно выбрать только один такой переключатель.
Пример использования RudioButton
· На форме организуем 2 RudioButton и 1 Button.
· За счет применения оператора IF код проверит какой переключатель на форме выбран. При выбое RudioButton1 будет показано 1 сообжение, а при RudioButton2 – второе.
|
· Для кнопки в редакторе наберем:
procedure TForm1.Button1Click(Sender: TObject);
Begin
|
|
История развития пистолетов-пулеметов: Предпосылкой для возникновения пистолетов-пулеметов послужила давняя тенденция тяготения винтовок...
Наброски и зарисовки растений, плодов, цветов: Освоить конструктивное построение структуры дерева через зарисовки отдельных деревьев, группы деревьев...
Биохимия спиртового брожения: Основу технологии получения пива составляет спиртовое брожение, - при котором сахар превращается...
Поперечные профили набережных и береговой полосы: На городских территориях берегоукрепление проектируют с учетом технических и экономических требований, но особое значение придают эстетическим...
© cyberpedia.su 2017-2024 - Не является автором материалов. Исключительное право сохранено за автором текста.
Если вы не хотите, чтобы данный материал был у нас на сайте, перейдите по ссылке: Нарушение авторских прав. Мы поможем в написании вашей работы!