- •Белорусский национальный технический университет
- •Конспект лекций по курсу «конструирование программ и языки программирования»
- •1. Введение Общие понятия
- •Недостатки ms-dos
- •Преимущества Windows
- •Основные концепции Windows
- •Объекты Windows
- •Механизмы сообщения
- •2. Основы визуального программирования в delphi Принцип создания приложений в Delphi
- •Процесс создания исполняемого файла в Delphi
- •3. Стандартные визуальные компоненты Формы
- •4. События, обрабатываемые формой
- •5. Свойства стандартных компонент Общие сведения
- •Компонент Tlabel
- •Компонент tButton
- •Компонент tEdit
- •Компонента tMemo
- •Компонента tCheckBox Это кнопка с независимой фиксацией. Такой компонент обладает следующими свойствами:
- •Компонент tRadioGroup
- •Компонент tСheckListBox
- •Компонент tPanel
- •К омпонент tScrollBar
- •К омпонент tMainMenu
- •Компонент tPopupMenu
- •Компонент tListBox
- •Компонент tComboBox
- •6. Графические компоненты Общие свойства
- •Компонент tImage (отображение картинок)
- •Компонент tShape (стандартные фигуры)
- •Компонент tBevel (кромка)
- •Компонент tChart (построитель графиков)
- •Компонент tPaintBox
- •Компонента tImage
- •Компонента tShape
- •Компонент tBevel
- •Поддержка графических операций
- •Свойство объектов Canvas
- •7. Табличное представление данных
- •Компонент tStringGrid
- •Компонент tDrawGrid
- •8. Дополнительные компоненты Компонент tBitBtn
- •Компонент tSpeedButton
- •Компонент tToolBar
- •9. Организация стандартных диалогов
- •Компонент tOpenDialog и tSaveDialog
- •Компонент tOpenPictureDialog и tSavePictuteDialog
- •Компонент tColorDialog
- •Компонент tFontDialog
- •Компонент tPrintDialog
- •10. Программирование печати документов
- •11. Вывод графических изображений
- •Компонент tProgressBar
- •Компонент tAnimate
- •Компонент tDateTimePicker
- •Компонент tMediaPlayer
- •Компонент tAnimate
- •Средства создания мультимедийных приложений Что такое мультимедиа
- •Компонент tMediaPlayer
- •Два вида программ мультимедиа
- •Пример программы с мультимедиа
- •Обработка исключительных ситуаций
- •Структурная обработка исключительных ситуаций
- •Модель исключительных ситуаций в Delphi
- •Синтаксис обработки исключительных ситуаций
- •Примеры обработки исключительных ситуаций
- •Вызов исключительной ситуации
- •Доступ к экземпляру объекта exception
- •Предопределенные обработчики исключительных ситуаций
- •Исключения, возникающие при работе с базами данных
- •Заключение
- •Создание и использование ini-файлов
- •Развертывание приложений. Локализация и интернационализация приложений
- •Литература
- •12. Управление программой с помощью панели инструментов
- •Компонент tImageList
- •Компонент tToolBar- инструментальная панель
- •13. Создание программы с несколькими формами и средства управления ими
- •14. Создание многостраничного документа
- •Литература
Компонент tListBox
TListBox |
|
В ряде случаев необходимо предложить пользователю выбор из одного или нескольких готовых ответов. Для этих целей применяется компонента TListBox. Если выводимый список не умещается в отведенном пространстве окна, то появляются вертикальный и/или горизонтальный скроллинг.
Основные свойства:
Items : TSrings;
С помощью этого свойства задается набор строк (список);
ItemIndex : Integer;
- индекс выделенного (сфокусированного) элемента (нумерация начинается с нуля);
Columns: LongInt;
- содержит количество столбцов (по умолчанию равно 1);
Sorted: Boolean;
- позволяет разрешать или отменять сортировку строк в алфавитном порядке.
Чтобы на стадии проектирования занести информацию в ListBox, необходимо выбрать свойство Items и нажать . При этом будет вызван текстовый редактор.
Пример1.
Пусть требуется организовать выбор фамилий из списка.
Для набора фамилий активизируем текстовый редактор с помощью свойства Items. Предположим, что необходимо выбранную фамилию из списка выводить в компоненту Label.
unit U4;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type
TForm2 = class(TForm)
ListBox1: TListBox;
Label1: TLabel;
Label2: TLabel;
procedure FormCreate(Sender: TObject);
procedure ListBox1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
{$R *.DFM}
procedure TForm2.FormCreate(Sender: TObject);
begin
ListBox1.ItemIndex := 0;
Label1.Caption := ListBox1.Items[ListBox1.ItemIndex];
end;
procedure TForm2.ListBox1Click(Sender: TObject);
begin
Label1.Caption := ListBox1.Items[ListBox1.ItemIndex];
end;
end.
Компонент tComboBox
TComboBox |
|
Эта компонента представляет собой комбинированный список, составленный из TEdit и TListBox, и как следствие этого он совмещает свойства строкового редактора и списка.
Существует 5 модификаций компонента TComboBox. Эти модификации устанавливаются с помощью свойства Style:
Style := csSimple – простой комбинированный список (рис.2).
Во всех остальных случаях компонент TComboBox представляется в свернутом виде.
Когда
Style := csDropDown;
с помощью кнопки раскрытия списка компонент TComboBox представляется в виде Simple. При этом имеется возможность в поле Edit вводить произвольную информацию.
В случае, когда:
Style := csDropDownList;
список также раскрывается кнопкой, но Edit работает только в режиме выбора информации из ListBox.
Компонент TComboBox имеет обработчики OnChange, OnClick (по умолчанию – OnChange).
Пример.
Пусть требуется из компонента TComboBox выбирать информацию и показывать ее в компоненте TEdit.
В обработчике ComboBox1Change будет следующий оператор:
Edit1.Text := ComboBox1.Text;
или
Edit1.Text := ComboBox1.Item[ComboBox1.ItemIndex];