Основные общие методы компонентов.

DisableAlign – временное отключение эффекта от свойства Align.

EnableAlign– включение эффекта от свойства Align.

Hide – скрывает компонент.

Show – отображает компонент.

SetFocus – передача компоненту фокуса ввода. Компонент не может получить фокус ввода, когда свойство Enabled равно false.

Clear – служит для очистки содержимого компонентов (текстовой информации).

Refresh – используется для обновления элемента и его перерисовке.

Обращение к объектам.

Для изменения значения свойства программным путем используется следующий формат:

Имя компонента . Имя свойства := значение;

Например:

Form1.Caption:=’Программа № 1’;

Button1.Caption:=’Вычислить’;

Label1.Color:=clBlue;

Label1.Font.Color:=clWhite;

Методы вызываются. Например:

Form1.Show;

Edit1.Clear;

Edit2.SetFocus.

4. Основные события.

К общим группам событий можно отнести:

- выбор управляющего элемента;

- перемещение указателя мыши;

- нажатие клавиш клавиатуры;

- получение и потеря элементом фокуса ввода;

- перемещение объектов методом Drag – and – Drop.

При выборе управляющего элемента возникает событие OnClick, которое также называется событием нажатия. Обычно оно возникает при щелчке левой кнопкой мыши на компоненте.

При щелчке любой кнопкой мыши генерируются еще два события: OnMouseDown, возникающее при нажатии кнопки мыши, и OnMouseUp, возникающее при отпускании кнопки мыши.

При двойном щелчке левой кнопкой мыши в области компонента генерируется событие OnDblClick.

При перемещении указателя мыши над компонентом генерируется событие OnMouseMove.

При работе с клавиатурой генерируются события OnKeyPress и OnKeyDown, возникающие при нажатии клавиши, а также событие OnKeyUp, возникающее при отпускании клавиши. Событие OnKeyPress генерируется при каждом нажатии алфавитно-цифровых клавиш и обрабатывается тогда, когда требуется реакция на нажатие одной клавиши, имеющей ASCII-код. Для обработки других клавиш можно использовать события OnKeyDown и OnKeyUp, возникающие при нажатии любой клавиши. В обработчике данных событий используется переменная Key, передающая код клавиши и программист может изменить фактический код клавиши на нужный. Это полезно при фильтрации нажатия каких-либо клавиш.

Технология Drag – and – Drop позволяет перемещать различные объекты, например, элементы из одного списка в другой. При этом используются два элемента управления: источник и приемник. С этой технологией связаны следующие события:

- OnStartDrag – генерируется источником в начале выполнения операции перемещения.

- OnDragOver – вызывается приемником, когда перемещаемый объект находится над ним.

- OnDragDrop – вызывается приемником, когда объект перемещается на него.

- OnEndDrag – генерируется источником, когда операция перемещения завершается.

Лекция № 5. Визуальные компоненты для отображения текстовой информации. Основные свойства компонентов.

1. Отображение текста

Текстпредставляет собой надпись (ярлык) и чаще всего используется в ка­честве заголовков для других управляющих элементов, которые не имеют собственного свойства Caption. Для отображения надписей, в первую оче­редь, используется компонент Label (метка) (вкладка Standard).Он пред­ставляет собой простой текст, который не может быть отредактирован пользователем при выполнении программы.

Для управления автоматической коррекцией размеров компонента Label в зависимости от текста надписи служит свойство AutoSize типа Boolean. Ес­ли значение свойства равно True (по умолчанию), то компонент Label из­меняет свои размеры соответственно содержащемуся в нем тексту, заданно­му в свойстве Caption.

Свойство Font позволяет измененить шрифта текста, выводимого компонентом Label. Нажав на плюсик слева от слова Font, можно увидеть список свойств шрифта. Нажав на многоточие справа от "Font", откроется диалоговое окно выбора шрифтов.

Способ выравнивания текста внутри компонента Label задает свойство Alignment типа TAlignment, которое может принимать одно из следующих значений:

- taLeftJustify — выравнивание по левому краю

- taCenter — центрирование текста

- taRightJustify — выравнивание по правому краю

Если свойствоAutoSize имеет значениеTrue, то свойствоAlignment не действует.

Управлять автоматическим переносом слов, не умещающихся по ширине, на другую строку можно с помощью свойства WordWrap типа Boolean. При установке значения True этого свойства лишние слова по ширине компонента Label переносятся на следующую строку.

Компонент StaticText.Компонент Delphi StaticText(вкладка Additional) предназначен для вывода небольшой текстовой строки на форме. Главное отличие его от компонента Label состоит в том, что он имеет рамку.

Свойство BorderStyle определяет

внешний вид рамки и оно может принимать одно из трех значений:

§ sbsNone - рамка отсутствует,

§ sbsSingle - рамка представляет из себя обычную линию,

§ sbsSunken - рамка представляет из себя вдавленную область.

2.Однострочные редакторы

Однострочный редактор, или строка редактирования, представляет собой поле ввода информации, в котором возможно отображение и изменение текста. В Delphi имеется несколько однострочных редакторов, из них наи­более часто используемым является компонент Edit.

Компонент Edit (вкладка Standard) позволяет вводить с клавиатуры и редактировать различ­ные символы, при этом поддерживаются операции, такие как, перемещение по строке с использованием клавиш управления курсором, удаление симво­лов с помощью клавиш <Backspace> и <Delete>, выделение части текста и др. Однако, однострочный редактор не реагирует на управляющие клавиши <Enter> и <Esc>.

СвойствоTextпредназначено для доступа к тексту компонента.

Для ограничения ввода символов в поле Textсвойство MaxLengthдолжно быть равно допустимому количеству символов. При MaxLength равным нулю нет ограничений на длину текста.

Очистить поле можно командой: Edit1.Clear;

или присвоить значение пустой строки: Edit1.Text := '';

Для изменения регистра символов в строке редактирования служит свойство CharCase, которое может принимать одно из трех значений:

- ecLowerCase - символы текста преобразуются в символы нижнего регистра

- ecNormal - регистр символов не изменяется (по умолчанию)

- ecUpperCase - символы текста преобразуются в символы верхнего регистра

При использовании компонента Edit для ввода пароля можно воспользоваться свойством PasswordСhar типа char, которое задает символ для отображения в поле ввода. Этот символ при вводе текста появляется вместо фактически вве­денной информации.

Компонент LabeledEdit (вкладка Additional) совмещает возможности двух компонентов Label и Edit.

Расположение надписи по отношению к полю ввода задается свойством LabelPosition:

• lpLeft - надпись слева,
• lpRight -надпись справа,
• lpBelow - надпись снизу,
• lpAbove - надпись сверху.

Расстояние между надписью и полем ввода свойством LabelSpacing.

По своим свойствам LabeledEdit почти полностью совпадает со свойствами компонента Edit. За свойства надписи отвечает свойство EditLabel, которое является вложенным компонентом Label. Надпись задается и редактируется в этом вложенном объекте - в свойстве Caption.

Компонент MaskEdit (вкладка Additional) также представляет собой однострочный редактор, но по сравнению с компонентом Edit он дополнительно предоставляет воз­можность ограничения вводимой информации по шаблону. С помощью шаблона (маски) можно ограничить число вводимых пользователем симво­лов, тип вводимых символов (алфавитный, цифровой и т. д.). Кроме того, во вводимую информацию можно вставить дополнительные символы (разделители при вводе даты, времени ит. п.). С помощью редактирования по маске удобно вводить телефонные номера, даты, почтовые индексы и другую информацию заранее определенного формата.

Маска задается в свойстве EditMask типа string. Она представляет собой последовательность специальных кодов, определяющих для строки редакти­рования формат содержащегося в ней текста. Для составления маски можно использовать редактор шаблонов. Редактор шаблонов вызывается двойным щелчком в поле значения свойства EditMask.

Маска состоит из трех полей, разделенных символом ";". Первое поле явля­ется собственно маской. Второе поле - это символ, определяющий, счита­ются ли литеральные символы частью данных. По умолчанию используется символ "1", и литеральные символы маски являются частью введенного в редактор текста (свойство Text). Если вместо "1" установить символ "0", то литеральные символы маски по-прежнему будут отображаться в поле редак­тора при вводе в него текста, однако в свойстве Text литеральные символы отсутствуют. Литеральные символы удобно использовать в качестве раздели­телей, например, при вводе телефонных номеров.

Третье поле содержит символ, используемый для представления знака про­бела в маске, по умолчанию это символ подчеркивания. Если ни второе, ни третье поля не определены, то для них используются значения по умолча­нию.

В маске можно применять следующие специальные символы:

! - в тексте подавляются начальные пробелы. Если символ ! отсутствует, то подавляются конечные пробелы.

> - символы, которые следуют за этим символом, до появления символа < переводятся в верхний регистр

< - символы, которые следуют за этим символом, до появления символа > переводятся в нижний регистр

<> - проверка регистра символов не производится

\ - символ, следующий за этим символом, является литерным

L - в позиции должен быть введен алфавитный символ

l (строчная латинская буква L) - в позиции может быть введен алфавит­ный символ

А - в позиции должен быть введен алфавитно-цифровой символ

а - в позиции может быть введен алфавитно-цифровой символ

С - в позиции должен быть введен символ

с - в позиции может быть введен символ

0 - в позиции должен быть введен цифровой символ

9 - в позиции может быть введен цифровой символ

# - в позиции может быть введен цифровой символ или знаки + и -

: - используется для разделения часов, минут и секунд в показаниях вре­мени

/ - используется для разделения дней, месяцев и лет в датах

; - разделяет поля маски

_ - оставляет в окне редактирования пустое пространство, являющееся автоматически пропускаемым разделителем и в которое нельзя ввести информацию.

Примеры масок:

!99/99/00;1;_ - для ввода даты

!000-00-00;1;_ - для ввода семизначного телефонного номера

!90:00;1;_ - для указания времени

1_1_1_1_1_1_;1;_ - для ввода слова длиной не более шести букв (между бу­квами отображаются пробелы)/

Маску можно выбрать из образцов в поле Sample Masks или ввести вручную в поле Input Mask. Легче выбрать из образцов наиболее близкую маску и отредактировать ее. Поле Character for Blanks задает вид незаполненной позиции во входной строке. Значок Save Literal Characters отвечает за включение в маску литеральных символов. В поле Test Input проверяется функциональность маски и какой будет вид пустого поля в приложении.

Для проверки вводимой информации можно использовать обработчики собы­тий нажатия клавиш, например, обработчик события OnKеуРгеss.

Пример.Ограничение набора символов, вводимых в редактор.

procedure TForml.EditlKeyPress(Sender : TObject; var Key : Char);

begin

if (Key<’0’ or (Key>'9') then Key:=#0;

end;

Здесь для редактора Editl установлено разрешение ввода только цифр.

Лекция № 6. Визуальные компоненты для редактирования многострочных данных. Основные свойства компонентов.

1. Многострочный редактор

Для работы с многострочным текстом Delphi предоставляет компонент Memo (вкладка Standard). Многострочный редактор имеет практически те же возможности редакти­рования текста, что и однострочные элементы редактирования. Главное от­личие этих управляющих элементов заключается в том, что многострочный редактор содержит несколько строк.

Для доступа ко всему содержимому многострочного редактора используется свойство Text типа String. В этом случае все содержимое компонента Memo представляется одной строкой, причем символ конца строки, вводимый при нажатии клавиши <Enter>, представляется двумя кодами #13#10, и видимых пользователем символов будет меньше, чем их содержится в строке Text. Эту особенность нужно учитывать, например, при определении позиции заданного символа в какой-либо строке компонента Memo.

Для работы с отдельными строками используется свойство Lines типа Tstrings. Класс Tstring специально создан для выполнения операций со строками. Компонент Memo может использовать возможности этого класса через свойство Lines.

Пример.Операции с многострочным редактором.

Memol.Lines[3]:= 'asd’;

Memo2.Lines.Clear;

МетоЗ.Lines.Add('Новая строка’);

Memo1.Lines.Count; //Количество строк в компоненте.

Здесь четвертой строке редактора Memol присваивается новое значение asd. Отметим, что в классе Tstring нумерация строк начинается с нуля. Содер­жимое редактора Memo2 полностью очищается. В конец текста редактора Меmо3 добавляется новая строка.

Содержимое компонента Memo можно загружать из текстового файла и со­хранять в текстовом файле. Для этого удобно использовать методы:

LoadFromFile (const FileName: String) и SaveToFile (const FileName: String) класса TStrings. Параметр FileName методов определяет текстовый файл для операций чтения и записи.

Пример.Чтение информации из текстового файла в компонент Memol.

Memol.Lines.LoadFromFile ( 'С: \TEXT\examplel.txt' );

Пример.Запись информации из компонента Мето2 в текстовый файл.

Memo2.Lines.SaveToFile('C:\TEXT\example2.txt');

Для того чтобы информацию было просматривать удобно, можно задать в поле редактирования полосы прокрутки с помощью свойства ScrollBars, принимающего следующие значения:

- ssNone - полосы прокрутки отсутствуют (по умолчанию)

- ssHorizontai - снизу имеется горизонтальная полоса прокрутки

- ssvertical — справа имеется вертикальная полоса прокрутки

- ssBoth - есть обе полосы прокрутки

Текст в поле компонента Memo может быть выровнен различными способа­ми. Способ выравнивания определяет свойство Alignment.

СвойствоReadOnlyразрешает редактирование текста (програмно текст можно добавлять).

Свойство MaxLength задает количество символов, которое можно ввести. Значение равное нулю не ограничивает ввода.

Для работы с выделенным текстом используются функции: SelStat - позиция первого выделенного символа, SelLength - число сколько выделено символов, SelectAll - выделение всего текста,ClearSelection - очистить выделенный текст. Для работы выделенного текста с буфером обмена используются методы:

• CutToClipboard - вырезать выделенный текст;
• CopyToClipboard - скопировать выделенный текст;
• PasteFromClipboard - вставить выделенный текст;

В отличие от однострочного редактора, компонент Memo обладает возможно­стью реакции на нажатие клавиши <Enter>. Чтобы при этом происходил ввод новой строки, свойству WantReturns типа Boolean должно быть установлено значение True (по умолч.). В противном случае редактор не реагирует на нажатие клавиши <Enter>.

Аналогичное назначение имеет свойство WantTabs типа Boolean, опреде­ляющее реакцию компонента на нажатие клавиши <ТаЬ>. Если свойству установлено значение True, то при нажатии клавиши <ТаЬ> в текст встав­ляются символы табуляции. По умолчанию свойство WantTabs имеет значе­ние False, и при нажатии клавиши <ТаЬ> редактор передает фокус ввода следующему элементу управления.

У компонентаMemoесть возможность использовать, как в других текстовых редакторах, общепринятые горячие клавиши, такие как: Ctrl-X — выделенный текст вырезается и помещается в буфер обмена, Ctrl-C — копируем выделенный текст в буфер обмена, Ctrl-V — вставляем текстовое содержимое из буфера обмена в место нахождения курсора, для отмены последней команды используем Ctrl-Z.

Компонент RichEdit представляет собой элемент управления редактирова­нием текста и в дополнение к Memo поддерживает такие операции формати­рования текста, как выравнивание текста и табуляция, применение отсту­пов, изменение гарнитуры и др. Текст, содержащийся в этом элементе редактирования, совместим с форматом RTF (Rich Text Format), поддержи­ваемым всеми текстовыми процессорами в среде Windows.

2.Общие элементы компонентов редактирования

Компоненты, используемые для редактирования информации, похожи друг на друга и, соответственно, имеют много общих свойств, событий и методов.

При любых изменениях в содержимом редактора возникает событие onChange типа TNotifyEvent, которое можно использовать для проверки информации, содержащейся в поле ввода, например, для оперативного контроля правиль­ности набора данных. Кроме того, при модификации данных редактора свойство Modiefidтипа Boolean принимает значение True. Это свойство можно использовать, например, при проверке того, сохранена ли редакти­руемая информация на диске:

if Memol.Modiefid then <выдача предупреждения и сохранение информации>;

Для указания максимального количества символов, которые допускается вво­дить в элемент редактирования, можно использовать свойство MaxLengthтипа integer. При этом ограничение на длину текста относится к вводу со стороны пользователя, программно можно ввести большее количество сим­волов, чем это задано в свойстве MaxLength. По умолчанию длина текста, вводимого пользователем, не ограничена (MaxLength = 0).

Свойства AutoSelect, SelStart, SelLength и SelTextпозволяют работать с выделенным (селектированным) фрагментом текста. Эти свойства доступны не только для чтения, но и для записи, когда фрагмент выделяется программным способом (например, в процессе поиска или замены информации).

Свойство AutoSelectтипа Boolean определяет, будет ли автоматически вы­делен текст в элементе редактирования, когда последний получает фокус ввода (по умолчанию имеет значение True).

Значение свойстваSelText типа string определяет выделенный фрагмент. При отсутствии выделенного текста значением свойства является пустая строка.

Свойства SelStart и SelLength типа Integer задают соответственно начальную позицию в строке (отсчет символов в строке начинается с нуля) и длину выделенного фрагмента.

Кроме свойств, для операций с выделенным фрагментом текста служат такие методы, как SelectAll, CopyToClipBoard И CutToClipBoard.

Метод SelectAll выделяет весь текст в элементе редактирования.

Методы CopyToClipBoard и CutToClipBoard соответственно копируют и вы­резают в буфер обмена выделенный фрагмент текста.

Для работы с буфером обмена имеется также метод PasteFromClipBoard, предназначенный для вставки текста из буфера обмена в место текущего расположения курсора в элементе редактирования. Если имеется выделен­ный фрагмент, то вставляемый текст заменяет его.

Для проверки данных, введенных в элемент редактирования, можно исполь­зовать событие onExit, возникающее при окончании ввода, т. е. при потере фокуса этим элементом.

Пример.Проверка данных, введенных в редактор.

procedure TForml.EditlExit(Sender: TObject);

begin

if (Editl.Text='123') or (Editl.Text='456') then begin

MessageDlg(‘Артикул’+Editl.Text+'неправильный!'+

#13#10+'Повторите ввод.', mtError, [mbOK], 0);

Editl.SetFocus;

Editl.SelectAll;

end; end;

В редактор Editl вводится артикул нового товара, который не должен быть равен "123" или "45б". При окончании ввода в обработчике события onExit выполняется проверка артикула. Если он набран неверно, выдается предупреждение, а фокус снова получает ре­дактор Editl.

Основным назначением элементов редактирования является ввод и измене­ние текста, но их можно использовать и для отображения нередактируемого текста, например, при выводе справочной информации. С этой целью нужно установить соответствующие значения свойств ReadOnly или Enabled. Оба способа обеспечивают отображение нередактируемого текста, однако имеют свои недостатки. В первом случае компонент Memo при выполнении программы может получать фокус. В поле ввода отображается курсор, что создает у пользователя иллю­зию доступности текста для редактирования. Подобного не происходит при использовании свойства Enabled, однако в этом случае поле редактирования становится неактивным, и нахо­дящийся в нем текст отображается бледным цветом, что не слишком удобно для чтения. Кроме того, происходит отключение полос прокрутки (при их наличии).

Лекция № 7. Визуальные компоненты: работа со списками: простой, комбинированный. Основные свойства компонентов.

Работа со списками.

Списокпредставляет собой упорядоченную совокупность взаимосвязанных элементов, являющихся текстовыми строками. Как и другие объекты, представ­ляющие собой совокупность данных, списки предоставляют возможности по добавлению, удалению и выбору отдельных его элементов (строк).

Простой список

Простой список представляет собой прямоугольную область, в которой располагаются его элементы. Для работы с простым списком служит компонент ListBox.

Если количество строк больше, чем может их поместиться в видимой области списка, то рядом с областью отображения появляется полоса прокрутки. Ориентация полосы прокрутки, а также число колонок, которые одновременно видны в области списка, зависят от свойства Columns типа integer. По умолчанию свойство имеет значение 0. Это означает, что все элементы списка расположены в один столбец, и при необходимости автоматически появляется и исчезает вертикальная полоса прокрутки.

Если свойство Columns имеет значение, большее или равное 1, то в области списка всегда присутствует горизонтальная полоса прокрутки, а элементы разбиваются на такое число колонок (столбцов), чтобы можно было путем прокрутки списка по горизонтали просмотреть все его элементы. При этом в видимой области списка отображается число колонок, определяемое свойством columns.

СвойствоItems –массив строк, определяющий количество элементов и их содержимое (нумерация с 0).

Пример. ListBox1.Items[0] – обращение к первому элементу списка.

СвойствоItemIndex - возвращает номер выделенной строки (текущего элемента).

Пример.ListBox1.Items[ListBox1.ItemIndex] – обращение к выделенному элементу.

При работе со списком программист может управлять номером элемента, который отображается вверху видимой области списка. Эта возможность обеспечивается свойством времени выполнения TopIndexтипа integer.

Пример.Процедура управления отображением элементов списка.

procedure TForml.UpDownlClick(Sender: TObject; Button: TUDBtnType);

begin

ListBoxl.Toplndex:=UpDownl.Position;

end;

Вверху в списке ListBoxl отображается элемент, номер которого задает ре­версивный счетчик UpDown1. В данном случае счетчик upDown1 является сво­его рода скроллером для прокрутки содержимого списка.

Стиль простого списка задает свойство Style типа TListBoxStyle, прини­мающее следующие значения:

- ibStandard - стандартный стиль (по умолчанию)

- ibOwnerDrawFixed - список с элементами фиксированной высоты, опре­деляемой свойством ItemHeight

- IbOwnerDrawVariable - список с элементами, которые могут иметь разную высоту

Если стиль списка отличен от значения ibStandard, то программист сам отвечает за прорисовку элементов списка. Для этих целей используются графические возможности Delphi.

Список может иметь обычную рамку или не иметь рамки вообще. Наличие рамки определяет свойство BorderStyleтипа TBorderstyle, принимающее два возможных значения:

- bsNone - рамки нет

- bsSingle - рамка есть (по умолчанию)

2.Комбинированный список

Комбинированный список объединяет поле редактирования и список. Пользо­ватель может выбирать значение из списка или вводить его непосредственно в поле. Для работы с комбинированным списком Delphi служит компонент ComboBox.

Список, находящийся в компоненте ComboBox, может быть простым и раскрывающимся. Раскрывающийся список в свернутом виде занимает на экране меньше места.

В отличие от простого, комбинированный список не может иметь горизон­тальную полосу прокрутки и из комбинированного списка можно выбрать одно значение.

Свойство Items- предоставляет доступ к строкам этого компонента.

Свойство ItemIndex - возвращает номер выделенной строки.

Пример.ComboBox1.ItemIndex:= 3 - выбор четвертой строки списка.

Свойство Text определяет содержимое выбранной строки списка.

Пример.ListBox1.Items[3]:= ComboBox1.Text-содержимое выбранной строки комбинированного списка записывается в 4-ую строку простого списка.

Свойство Style типа TComboBoxstyle определяет внешний вид и поведение комбинированного списка. Свойство style может принимать следующие значения:

- csDropDown - раскрывающийся список с полем редактирования (по умолчанию). Пользователь может выбирать элементы из списка, при этом выбранный элемент появляется в поле ввода, или вводить (редактировать) информацию непосредственно в поле ввода.

- csSimple - поле редактирования с постоянно раскрытым списком. Для того чтобы список был виден, необходимо увеличить высоту (свойство Height) компонента ComboBox.

- csDropDownList - раскрывающийся список, допускающий выбор эле­ментов из списка.

- csOwnerDrawFixed - список с элементами фиксированной высоты.

- csOwnerDrawVariable - список с элементами, которые могут иметь разную высоту.

Если стиль списка имеет значениеcsOwnerDrawFixed или csOwnerDrawVariable, то программист сам отвечает за прорисовку элементов списка.

Свойство DropDownCount типа integer определяет количество строк, которые одновременно отображаются в раскрывающемся списке. Если значение свой­ства превышает число строк списка, определяемое значением подсвойства count свойства items, то на раскрывающемся списке автоматически появляет­ся вертикальная полоса прокрутки. Если размер списка меньше, чем задано в свойстве DropDownCount, то отображаемая область списка автоматически уменьшается. Свойство DropDownCount по умолчанию имеет значение 8.

Свойство DroppedDown типа Boolean позволяет определить, раскрыт ли список. Если свойство имеет значение True, то список отображается в раскры­том виде, в противном случае список свернут. При отображении раскрывающегося списка возникает событие onDropDown типа TNotifyEvent. Программист может самостоятельно управлять раскрытием и свертыванием списка в процессе выполнения приложения, устанавливая свойству DroppedDown соответствующее значение.

Пример.Управление раскрытием и свертыванием списка.

procedure TForm5.btnSpisokOpenClicklSender: TObject);

begin

ComboBox1.DroppedDown:=true;

end;

procedure TForm5.btnSpisokCloseClick(Sender: TObject);

begin

ComboBox1.DroppedDown:=false;

end;

3.Общая характеристика списков

Простой и комбинированный список во многом похожи друг на друга и имеют много свойств, методов и событий. Основным для списков является свойство Items, в свою очередь, содержащее большое число свойств и мето­дов, ориентированных на работу со строками.

Свойство Items типа Tstrings представляет собой массив строк и определя­ет количество элементов списка и их содержимое. Класс Tstrings является базовым типом и разработан специально для операций со строками.

Каждый элемент списка является строкой, к которой можно получить дос­туп по ее номеру в массиве строк items. Отсчет элементов списка начинает­ся с нуля. Для обращения к первому элементу нужно указать items[0], ко второму — items[1], к третьему — items [2] и т. д. При операциях с отдельными строками программист должен контролировать номера строк в списке и не допускать обращения к несуществующему элементу.

Свойство Сount типа integer задает число элементов в списке. Так как пер­вый элемент списка имеет нулевой номер, то номер последнего элемента равен count-1.

Пример: Присваивание элементам списка ListBox1 новых значений.

var n: integer;

...

for n:=0 to ListBoxi.Items.Count - 1 do

ListBox1.Items[n]:='Строка номер '+IntToStr(n);

Методы Add и Insert обеспечивают добавление строк в список.

Функция Add (const S: string): Integer добавляет в конец списка строку, заданную параметром s, а в качестве результата возвращает положение нового элемента в списке.

Процедура Insert (Index: Integer; const S: String) вставляет строку S на позицию с номером, определяемым параметром Index. При этом элемен­ты списка, находившиеся до операции вставки в указанной позиции и ни­же, смещаются вниз.

Пример.Добавление к комбинированному списку ComboBoxl строки «Нажата кнопка Buttonl».

procedure TForml.ButtonlClicklSender: TObject);

begin

ComboBoxl.Items.Add(‘Нажата кнопка Buttonl’);

end;

В процессе создания приложений периодически необходимо, чтобы один список содержал те же данные, что и другой. Достаточно просто согласова­ние списков можно выполнить с использованием методов AddStrings и Assign. Оба метода позволяют при одном вызове увеличить содержимое списка более, чем на один элемент. Проверить необходимость выполнения операции согласования списков можно с помощью метода Equals.

Процедура AddStrings (strings: Tstrings) добавляет в конец списка группу строк, описываемую параметром strings.

Процедура Assign (Source: TPersistent) присваивает один объект другому, при этом объекты должны иметь совместимые типы. Применительно к спи­скам в результате выполнения процедуры происходит копирование информа­ции из одного списка в другой с заменой содержимого. Если размеры списков (число элементов) не совпадают, то после замены число элементов заменяе­мого списка становится равным числу элементов копируемого списка.

Функция Equals (Strings: TStrings): Boolean используется для определения, содержат ли два списка строк одинаковую текстовую информацию. Если содержимое списков совпадает, то функция возвращает значение True, в противном случае — значение False. Содержимое списков одинаково, ес­ли списки равны по длине, и совпадают все их элементы.

Для удаления элементов списка используются методы Delete и clear.

Процедура Delete (index: integer)удаляет элемент с номером, заданным параметром index. При попытке удаления несуществующей строки сообще­ние об ошибке не выдается, но метод Delete не срабатывает.

Процедура Clearочищает список, удаляя все его элементы.

Пример.ComboBoxl.Items.Clear;

Процедура Move (CurIndex, NewIndex: integer) сдвигает элемент на по­зиции c номером Curindex в новую позицию с номером Newindex. Если указанный номер больше, чем есть элементов в списке, то возникает ошибка.

Выполнить поиск элемента в списке можно с помощью метода IndexOf.

Процедура IndexOf (const S: string): integerопределяет, содержится ли в списке строка s. В случае успешного поиска процедура возвращает но­мер позиции найденной строки в списке, если строковый элемент не най­ден, то возвращается значение -1.

Класс TStrings имеет методы SaveToFile и LoadFromFile, позволяющие непосредственно работать с текстовыми файлами. Эти методы предоставля­ют возможность сохранения строк списка в текстовом файле на диске и по­следующего чтения списка строк из текстового файла. Символы текстового файла кодируются в коде ANSI.

Пример.Процедура сохранения содержимого списка.

ListBox3. Items. SaveToFile('c:\firma\family.txt’);

Процедура LoadFromFile (const FileName: string) заполняет список содержимым указанного текстового файла, предыдущее содержимое списка очищается. Если заданный файл отсутствует на диске, то возникает ошибка при выполнении приложения.

Пример.Загрузка содержимого списка.

procedure TForml.FormCreate(Sender: TObject);

begin

ComboBox2.Items.LoadFromFile('С:\TEXT\personal.txt');

end;

При конструировании приложения изменение списка строк выполняется с помощью редактора String List editor (Строковый редактор). Вы­зов строкового редактора выполняется через Инспектор объектов двойным щелчком кнопкой мыши в области значения свойства Items типа TStrings.

Строковый редактор позволяет добавлять строки в список, удалять их из списка и изменять содержимое имеющихся строк.

4.Другие характеристики списков

Элементы списка могут быть отсортированы в алфавитном порядке. Наличие или отсутствие сортировки определяет свойствоSorted типа Boolean. При значении свойства False (по умолчанию) элементы в списке располагаются в порядке их поступления в список. Если свойство sorted имеет значение. True, то элементы автоматически сортируются по алфавиту в порядке возрастания.

Действие свойства Sorted является статическим, а не динамическим. Это означает, что при добавлении к отсортированному списку методами Insert и Add новых строк они размещаются на указанных позициях или в конце списка, а не по алфавиту. Чтобы отсортировать список, нужно установить значение свойства sorted в False, а затем — снова в True:

ListBoxl.Sorted:=false;

ListBoxl.Sorted:=true;

Пользователь может выбирать отдельные строки списка с помощью мыши и клавиатуры. Выбранный в списке элемент определяется свойством ItemIndex типа integer. При анализе номеров строк нужно иметь в виду, что отсчет начинается с нуля.

Программист может выбрать элемент списка, установив требуемое значение свойстваItemIndex. Так, оператор ListBox2.Itemindex:=3; приводит к выбору четвертой строки списка ListBox2, и это отображается на экране.

По умолчанию в списке можно выбрать один элемент. Для выбора двух и более элементов свойству MultiSelect типа Boolean, управляющему возмож­ностью выбора нескольких строк, устанавливается значение True. По умолча­нию свойство Multiseiect имеет значение False.

В случае, когда список поддерживает возможность выбора нескольких строк, свойство ExtendedSelect типа Boolean управляет способом выбора нескольких элементов. Когда свойство ExtendedSelect имеет значение False, добавить к выбранной группе очередной элемент можно только с помощью мыши. При этом первый щелчок кнопкой мыши на строке выби­рает ее, а повторный отменяет выбор строки. Если свойство ExtendedSelect имеет значение True (по умолчанию), то в дополнение можно выбирать элементы и с помощью клавиш управления курсором, <Shift>, <Ctrl>.

Так как у комбинированного списка можно одновременно выбирать один элемент, то у него отсутствуют свойства MultiSelect и ExtendedSelect.

Свойство Selcount типа integer возвращает число выбранных элементов в списке. Для определения номеров выбранных строк можно просмотреть зна­чения свойства Selected [Index: Integer] типа Boolean, представляющего собой массив логических значений. Если строка с номером index выбрана, то ее признак selected принимает значение True

При выборе элемента списка происходит событие OnClick, которое можно использовать для выполнения обработки выбранных строк.

Лекция № 8. Компоненты-кнопки. Переключатели. Основные свойства компонентов.

1. Виды кнопок, используемые компоненты и их свойства.

Кнопки являются управляющими элементами