
- •Введение
- •Лабораторная работа №1 интерфейс среды delphi
- •Интегрированная среда
- •Главное окно
- •Проектировщик форм
- •Окно редактора кода
- •Структура модуля
- •Окно инспектора объектов (Object Inspector)
- •Окно дерева объектов
- •Окно браузера объектов
- •Меню интегрированной среды
- •Лабораторная работа № 2 обработчик события
- •Лабораторная работа № 3 программирование алгоритмов линейной структуры
- •Лабораторная работа № 4 программирование алгоритмов разветвленной структуры
- •Лабораторная работа № 5 программирование выбора действий с помощью компонента ComboBox
- •Лабораторная работа № 6 программирование алгоритмов разветвленно-циклической структуры
- •Лабораторная работа № 7 диалоги открытия и сохранения файлов в delphi
- •Лабораторная работа № 8 обработка массивов в delphi
- •Лабораторная работа № 9 Обработка матриц в Delphi
- •Лабораторная работа № 10 Обработка списков в Delphi
- •Список контрольных вопросов
- •Cписок литературы
Лабораторная работа № 10 Обработка списков в Delphi
Цель работы:
Разработать программу, которая формирует два списка, в которых записаны символы и соответствующие им коды. Один список необходимо отсортировать в алфавитном порядке по символу, а другой по коду символа. Списки необходимо вывести в многострочное редактируемое поле Memo.
Указания к работе
Перенесите на форму кнопку и компонент Memo.
Запишите обработчик события кнопки.
procedure TForm1.Button1Click(Sender: TObject);
var
k: Byte;
List1, List2: TStringList;
S: String;
Begin // создаем 2 списка
List1:=TStringList.Create;
List1.Sorted:=True;
List2:=TStringList.Create;
for k:=32 to 255 do // цикл наполнения списков кодами
begin
S:=IntToStr(k); // код символа
if k<100 then
s:='0'+s; // двузначное число дополняется ведущим нулем
List1.add(Char(k)+ #9 + S); // формируем списки
List2.add(s+#9+Char(k));
end;
List1.Sorted:=False; // отключаем сортировку списка List1
for k:=0 to list1.Count-1 do
list1[k]:=list1[k]+#9+List2[k]; // объединяем 2 списка
Memo1.Lines.Assign(List1);
List1.Free; // уничтожаем списки
List2.Free;
end;
3. Запустите программу на исполнение (F9). Проанализируйте соответствие обоих списков.
Список контрольных вопросов
Назначение и возможности Delphi. Особенности версии Delphi 7.
Назначение окон в Delphi (главное окно, окно формы, окно кода программы, окно дерева объектов, окно инспектора объектов, окно браузера кода, окно дерева объектов).
Основные команды главного меню. Инструментальные кнопки.
Структура проекта, структура модуля Delphi.
Принцип объектно-ориентированного программирования. Взаимодействие формы и модуля. Обработчик события OnClick (щелчок по кнопке). Реакция на события мыши и клавиатуры.
Назначение компонент вкладки Standart.
Назначение компонент вкладки Additional.
Назначение компонент вкладок System, Dialogs.
Назначение компонент вкладок Samples, Activex.
Массивы в Delphi.
Записи в Delphi.
Строки в Delphi.
Операции с файлами в Delphi.
Оператор присваивания, составной оператор, условный оператор в Delphi.
Операторы, предназначенные для организации циклов в Delphi.
Процедуры и функции в Delphi. Локальные и глобальные переменные. Понятие рекурсии.
Cписок литературы
Бобровский С. И. «Delphi 7. Учебный курс» - СПб.: Питер, 2005 г.
Фаронов В. В. «Delphi 6. Учебный курс». Москва, 2001 г.
Фаронов В. В. «Delphi 6. Программирование на языке высокого уровня: Учебник для вузов» - СПб.: Питер, 2005г.
Писарев Т. В. «Программирование в Delphi6».
М.: ДМК Пресс 2002 г.
Архангельский А. Я. «Интегрированная среда разработки Delphi
от версии 1 до версии 5». М.: Изд. БИНОМ, 1999 г.
МЕТОДИЧЕСКИЕ РЕКОМЕНДАЦИИ
ДЛЯ ЛАБОРАТОРНЫХ РАБОТ ПО ДИСЦИПЛИНЕ
«ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ ВЫСОКОГО УРОВНЯ»
СПЕЦИАЛЬНОСТИ:
ИНФОРМАЦИОННЫЕ СИСТЕМЫ И ТЕХНОЛОГИИ - 071900
АВТОМАТИЗИРОВАННЫЕ СИСТЕМЫ УПРАВЛЕНИЯ - 220200
Автор - cоставитель Тезик Константин Анатольевич
Сдано в набор
Подписано к печати
Формат 60x841/16
Гарнитура «Times New Roman»
Бумага офсетная
Компьютерный набор и верстка
Усл. П.л.
Заказ
Тираж
Цена договорная