Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Звіт.docx
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
1.91 Mб
Скачать

1.7 Робота з динамічними структурами даних

Завдання. Написати програму для реалізації телефонного довідника. Реалізувати зберігання даних у вигляді лінійного списку. Створити меню та контроль помилок при вводі. У кожному елементі списку міститься інформація: прізвище, ім’я, по-батькові абонента, адреса, борг за міські переговори, борг за міжміські переговори, номер телефону.

Програма повинна забезпечити:

  • початкове формування довідника

  • вивід телефонного довідника

  • вибір абонента за вказаним номером

Текст програми

Результат виконання

Рисунок 1.24 – Результати виконання Рисунок 1.25 – Результати виконання (початкове формування довідника) (вибір абонента за вказаним номером)

Рисунок 1.25 – Результати виконання завдання

(вивід телефонного довідника)

Розділ 2. Мова програмування delphi

2.1 Опис мови програмування Delphi

Delphi — мова програмування, що ґрунтується на діалекті мови Pascal від компанії Borland. До версії 7.0 мала назву ObjectPascal. Окрім того Delphi - середовище розробки (IDE) для однойменної мови. Ця плутанина часто викликає непорозуміння. По суті, Delphi є об'єктно-орієнтованим розширенням мови Pascal.

Спочатку на Delphi можна було програмувати під MS Windows 3.1. Починаючи з версії 2.0 на Delphi можна створювати програми під будь-яку з 32-бітних версій MS Windows.

В 2000 році була спроба створити варіант Delphi під операційну систему на базі ядра Linux, така модифікація Delphi мала назву Kylix. Було випущено 3 версії Kylix, проте експеримент виявився невдалим і 2003 року проект був заморожений.

2003 року була створена модифікація мови під платформу Microsoft.NET, що отримала назву Delphi.NET. Цей варіант мови послідовно розвивається в версіях Delphi 8, 2005, 2006, 2007.

Частково Delphi підтримується також у відкритому проекті FreePascal, що потенційно дозволяє створювати програми під велику кількість платформ.

Для виконання практичних завдань було використано середовище розробки Embarcadero Rad Studio XE4, оскільки воно дозволяє розробляти програми на комп’ютерах з 64-бітною версією ОС Windows 8, яка була встановлена на комп’ютері.

2.2 Розробка програмного продукту «Анкета студента»

Завдання: створити форму «Анкета студента» з заданими атрибутами, в тому числі двома фотографіями, які перекривають одна одну і мають з’являтися в результаті натискання кнопки.

Конструктор форми зображено на рисунку 2.1.

Рисунок 2.1 – Конструктор форми

Результати виконання програми зображені на рисунках 2.2–2.3.

Рисунок 2.2 - Вікно робочої програми Рисунок 2.3 - Вікно робочої програми

Як видно при натисканні на кнопку «Джабулані» на формі з’являється відповідне фото. При натисканні кнопки «Забрати фотографію» фото зникає і кнопка стає неактивною. Із іншими діями при натисканні на кнопки можна ознайомитись у програмному коді нижче.

Текст программного коду:

procedure TForm1.Button1Click(Sender: TObject);

begin

Image2.Visible:=true;

image1.Visible:=false;

image3.Visible:=false;

end;

procedure TForm1.Button4Click(Sender: TObject);

begin

image3.visible:=false ;

image1.Visible:=false;

image2.Visible:=false;

button4.Enabled:=false;

end;

procedure TForm1.Button5Click(Sender: TObject);

begin

if image2.visible=true then begin

image2.Visible:=false;

image3.Visible:=false;

image1.Visible:=true;end

else

if image1.visible=true then begin

image1.Visible:=false;

image2.Visible:=false;

image3.Visible:=true ; end

else

if image3.visible=true then begin

image3.Visible:=false;

image1.Visible:=false;

image2.Visible:=true ;

end;

end;

end.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]