Создание процедуры-обработчики события ComboBox1KeyPress

В соответствии с заданием необходимо, чтобы при нажатии клавиши Enter строка символов, которую пользователь набрал в поле редактирования, переносилась в список выбора компонента ComboBox1.

Для создания процедуры-обработчика этого события необходимо в Инспекторе Объектов выбрать компонент ComboBox1, на странице Events (События) найти событие OnKeyPress и дважды щелкнуть «мышью» по его правой части. Курсор установится в тексте процедуры procedure TForm1.ComboBox1KeyPress(Sender: TObject; var Key: Char),которая осуществляет обработку события нажатия клавиши на клавиатуре. Наберите операторы этой процедуры, пользуясь текстом модуля UnStr.

В результате выполнения этой процедуры при нажатии клавиши Enter строка из поля редактирования переносится в список выбора и очищается поле редактирования.

Создание процедуры-обработчики события нажатия клавиши «мыши» ComboBox1Click

Создание процедуры procedure TForm1.ComboBox1Click(Sender: TObject) выполняется аналогично процессу создания процедуры-обработчика события OnKeyPress компонента ComboBox1 (см. раздел 7.3.4).

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

Работа с приложением

Запустите созданное приложение. Занесите с помощью окна редактирования исходные данные в список выбора компонента ComboBox1. Ввод каждой строки завершайте нажатием клавиши Enter. Далее раскройте список выбора, щелкните «мышью» по нужной строке – в результате будет определено количество слов в строке и произойдет замена строчных букв прописными.

Преобразование строчных букв в прописные основано на том, что код строчной буквы больше кода прописной. Код прописных букв от «а» до «я» больше соответствующих строчных букв на 32 (см. таблицу кодов Ansi). Например, код символа «а» равен 224, а код символа «А» – 192. Эта закономерность сохраняется и для остальных букв русского алфавита.