Лабораторна робота № 13 Дослідження точності процесу обробки з використанням графічних можливостей Delphi
13.1 Мета роботи
Розширити проект попередньої роботи засобами вводу-виводу інформації і дослідити вплив технологічних чинників на точність обробки партії заготовок.
13.2 Теоретичні відомості
В проектування програмного коду врахувати можливість зміни параметрів а – швидкість спрацювання різця, v – швидкість різання (як незалежних аргументів) та деяких початкових параметрів обробки однієї деталі: Т – стійкість, Т0 – час і b – коефіцієнт видовження (залежних від аргументів). Для їх вводу на формі встановити компоненти Edit (закладка Standart) та SpinEdit (закладка Samples) для введення величин із поясненням змісту та розмірності цих параметрів за допомогою Label (закладка Standart). Для виводу результатів потрібно використати елемент StringGrid (закладка Edditional).
13.3 Хід роботи
13.3.1 Завантажте середовище візуального програмування Delphi.
13.3.2 Відкрийте роботу, виконану на минулому занятті.
13.3.3 Розмістіть на даній формі компонент StringGrid і задайте його розміри та властивості як показано на рисунку 13.1.
Рисунок 13.1 - Готова форма проекту з дослідження точності процесу
13.3.4 Встановіть елемент Label змініть його назву на „Результати:”, змініть тип, розмір та колір шрифта.
13.3.5 Розмістіть на формі решту елементів Label і змініть їх назви та шрифти, як показано на рисунку.Встановіть елементи SpinEdit та змініть їх значення (Value) в інспекторі об’єктів, відповідно до показаних на рисунку.
13.3.6 Змініть в інспекторі об’єктів максимальні (MaxValue) та мінімальні (MinValue) значення елементів SpinEdit (v = 50 – 150; m = 20 – 40; a = 6 – 16).
13.3.7 Встановіть елементи Edit та змініть їх значення Text в інспекторі об’єктів на відповідні до показаних на рисунку.
13.3.8 В процедурі події OnCreate введіть код програми для введення початкових даних з елементів Edit та SpinEdit:
t:=StrToFloat(Edit2.Text);
tо:=StrToFloat(Edit3.Text);
b:=StrToFloat(Edit1.Text);
a:=SpinEdit3.Value;
v:=SpinEdit1.Value;
m:=SpinEdit2.Value/100;
Додайте до процедури OnCreate код програми для заповнення першого рядка елемента
Form1.StringGrid1.Cells[0,0]:=' a, мкм/км';
Form1.StringGrid1.Cells[1,0]:=' b, мкм';
Form1.StringGrid1.Cells[2,0]:=' v, м/хв';
Form1.StringGrid1.Cells[3,0]:=' m';
Form1.StringGrid1.Cells[4,0]:=' T, хв';
Form1.StringGrid1.Cells[5,0]:=' To, хв';
Form1.StringGrid1.Cells[6,0]:=' R';
Form1.StringGrid1.Cells[7,0]:=' N';
13.3.9 До процедури DrawLine додайте команди, які будуть записувати дані в StringGrid.
13.3.10 Запустіть проект на виконання, покажіть його викладачу.
Комплексна лабораторна робота
Створення прикладної програми “Електронна заявка на ремонт верстатних агрегатів”
Лабораторна робота № 14
Списки і компоненти, що їх відображають. Застосування форми “AboutBox”
14.1 Мета роботи:
Oзнайомлення з компонентами ListBox, ComboBox. Створення додаткового вікна коду програми з метою запрограмувати подію, що пов’язана із компонентою ще одного вікна форми.