Файл: Лабораторная работа 1 Часть i 13 лабораторная работа n 1 Часть ii 16 лабораторная работа n 1 Часть iii 1.docx

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 10.11.2023

Просмотров: 325

Скачиваний: 2

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

СОДЕРЖАНИЕ

Оглавление

Тема 1: Знакомство с основными компонентами группы Standard. Компоненты Delphi визуальные и невизуальные. Свойства и события компонентов. Назначения и основные свойства компонентов группы Standard.

ЛАБОРАТОРНАЯ РАБОТА № 1 / Часть I /

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть II /

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 1 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 2 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III /3 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 4 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 5 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 6 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 7 вариант

ЛАБОРАТОРНАЯ РАБОТА N 1 / Часть III / 8 вариант

Тема 2: Стандартные диалоговые панели – компоненты группы Dialogs.

ЛАБОРАТОРНАЯ РАБОТА №2

Тема 3. Работа с таблицами в Delphi

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть I /

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 1 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 2 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 3 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 4 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 5 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 6 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 7 вариант

ЛАБОРАТОРНАЯ РАБОТА № 3 / Часть II / 8 вариант

Тема 4. Графические средства Delphi

Тема 4.1 Графические компоненты

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 1

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 2

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 3

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 4

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 5

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 6

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 7

ЛАБОРАТОРНАЯ РАБОТА № 4 / Вариант 8

Тема 5. Работа с файлами в Delphi

ЛАБОРАТОРНАЯ РАБОТА № 5

ЛАБОРАТОРНАЯ РАБОТА № 5


Тема: Работа с текстовыми файлами

Задание: создайте приложение «Учетная карточка работника» (см. далее)

Указания к выполнению задания:

  1. Создайте на диске Z в папку Lab_4, куда будете сохранять файлы создаваемого приложения.

  2. Приложение должно состоять из двух форм FORM1 и FORM2. Форма Form1 – главная. Форма FORM2 – дополнительная, она раскрывается только при нажатии левой кнопки мыши на строке ввода «Дата рождения» (используйте для обработки этого события метод FORM2.SHOW).

  3. На главной форме FORM1 разместите 4 строки ввода (используя компонент EDIT) для ввода фамилии, имени, отчества и даты рождения сотрудника. Для ввода адреса используйте компонент MEMO (слова: город, улица, дом-кв., а также линии подчеркивания задаются на этапе проектирования в свойстве LINES, а на этапе выполнения можно вводить конкретные адресные данные указанного сотрудника).

  4. Для указания, полученного сотрудником образования используйте компонент RadioGroup (объединив три радиокнопки в одну группу с общим названием «Образование». Название группы назначьте в свойстве Caption, названия радиокнопок пропишите в свойстве Items, установите значение свойства ItemIndex равным 1. Специальности укажите в свойстве ITEMS компонента COMBOBOX. Установите для COMBOBOX свойство STYLE равным DROРDOWN, чтобы прямо в окне COMBOBOX можно было вводить новые специальности, которых нет в списке. Свойство SORTED установите в True (список будет отсортирован по алфавиту). Чтобы новое введенное значение специальности было включено в список после нажатия клавиши Enter, включите в обработчик события ONKEYPRESS компонента COMBOBOX следующие строки:

IF KEY= #13 THEN BEGIN

ComboBox1.Items.Add (ComboBox1.text);

ComboBox1.Text := ''; // очистка строки ввода

key := #0;

End;

  1. Нажатие кнопки «Выход» закрывает главную форму FORM1- завершает работу программы.

  2. На форме FORM2 разместите два компонента SPINEDIT (из группы SAMPLES палитры компонентов) для отображения и выбора года и дня рождения человека. На этапе проектирования установите следующие свойства SPINEDIT:


  • maxvalue – максимальное значение, которое может принимать величина value (для года это может быть 2000, для дня – 31);

  • minvalue – минимальное значение для value (для года – 1900, для дня – 1);

  • value – значение числовой величины, отображаемой в окне SPINADIT по умолчанию (для года можно 1970, для дня – 15 или 1);

  • increment = 1 (на столько будет изменяться величина Value в строке при щелчке на кнопке).

  1. Для установки месяца рождения используйте компонент COMBOBOX. Названия месяцев задайте в свойстве ITEMS.

Установите для COMBOBOX следующие свойства:

  • style = DropDownList (список нельзя редактировать);

  • dropdowncount = 12 (столько элементов будут видны при раскрытии списка).

  1. Для завершения формирования даты и перехода в главную форму используйте обычную кнопку BUTTON, названную «Закрыть». При щелчке левой кнопки мыши на кнопке должны выполняться два действия:

  • формирование даты рождения в виде символьной строки, состоящей из номера дня, точки, названия месяца, точки и номера года;

  • закрытие формы FORM2.Процедура, обрабатывающая событие OnClick кнопки «Закрыть» может выглядеть следующим образом:

procedure TForm2.Button1Click(Sender:TObject);

begin

{формированиедаты}

S: = IntToStr(Spinedit1.value) + `.` + Combobox1.Text+`.` + IntToStr(Spinedit2.value);

Form2.CLOSE;

end;
Примечание: здесь S-глобальная переменная типа String. Для того, чтобы присвоенное ей значение было доступно и в других формах (модулях), следует описать ее в отдельном модуле Unit3 (создается модуль выполнением пункта меню File/New/Unit). Модуль Unit3 сохраните в папке Lab_4 под именем GLOBDAT, и во всех модулях, использующих переменную S, необходимо добавить в секцию uses раздела реализации модуля название модуля GLOBDAT(выполнить это рекомендуется используя пункт главного меню File/Use Unit).

unit GlobDat;

interface

var S : string[100];

implementation

end.

  1. После закрытия формы FORM2 активизируется форма FORM1, поэтому для того, чтобы сформированное в переменной S значение даты отобразилось в строке «Дата рождения», следует в обработчик события OnActivate формы Form1 включить строку:

edit4.text : = S;

(при условии, что строка ввода edit4 соответствует отображению даты рождения).

Дополните приложение кнопкой «Сохранить», при нажатии на которую набранная информация о сотруднике должна быть сохранена в строке текстового файла Sotrud.txt и добавлена к уже зарегистрированным сотрудникам. Желательно в таком виде:



ФИО: ИВАНОВ И.С.; Д.р.: 23.июль.1980; ОБРАЗОВАНИЕ: Среднее; СПЕЦИАЛЬНОСТЬ: Программист

  1. При завершении работы программы список специальностей также должен быть сохранен в текстовый файл Spets.txt; а при запуске программы этот список из файла (при его наличии) должен заполнять строки компонента Combobox.

  2. Дополните приложение отображением в компоненте Edit текущего времени. Для реализации этого задания необходимо вынести на форму невизуальный компонент Timer cо страницы System Палитры компонентов, и написать программный код:

procedure TForm1.Timer1Timer ();

begin

Edit5.text:= TimeToStr(Time);

End;