Хід лабораторної роботи. 1. Завантажити середовище візуального програмування Delphi

1. Завантажити середовище візуального програмування Delphi.

2. Задати властивості форми: Caption, Height, Width, Color.

3. Вставити у форму чотири текстових поля: Label1, Label2, Label3, Label4 (рис.8).

4. Вставити у форму багаторядкове поле редагування (об’єкт Memo) (рис.8). Задати вертикальну та горизонтальну смуги прокручування. Для цього необхідно увімкнути значення ssBoth для властивості ScrollBars. Для властивості Lines необхідно витерти значення Memo1 і ввести:

Результати:

x y

5. Вставити у форму головне меню (об’єкт MainMenu). Для цього необхідно обрати компонент MainMenu із закладки Standard палітри компонентів і перенести його на форму. Ввести назви команд головного меню. Для цього потрібно двічі клацнути лівою кнопкою миші на вставленому об’єкті MainMenu1. У вікні, що з’явиться вибрати мишею рамку для введення в неї тексту команди і ввести відповідне значення властивості Caption:

Обчислити Вихід Про програму

Протабулювати функцію

Очистити поле виведення

6. Вставити у форму три об’єкти типу Edit: Edit1, Edit2, Edit3 (рис.8). Очистити поля редагування Edit1, Edit2, Edit3.

7. Змінити заголовки Caption на об’єктах типу Label (рис.9).

Рис.8 Рис.9

8. Запрограмуватикоманду„Протабулювати функцію”. Процедура матиме такий вигляд:

Procedure TForm1.N2Click (Sender: TObject);

Var

x,y,h,a,b: real;

s1,s2: string;

Begin

a:= StrToFloat (Edit1.Text);

b:= StrToFloat (Edit2.Text);

h:= StrToFloat (Edit3.Text);

x:=a;

while x<=b do begin

y:=sin(2*x) – 2*cos(x);

s1:= FloatToStrF (x, ffFixed,3,2);

s2:= FloatToStrF (y,ffFixed,7,4);

Memo1.Lines.Add(s1+’ ’+s2);

x:=x+h;

end;

end;

9. Запрограмуватикоманду„Очистити поле виведення”. Процедура матиме такий вигляд:

Procedure TForm1.N3Click (Sender: TObject);

Begin

Memo1.Clear;

end;

10. Запрограмувати команду „Вихід”.

11. Запрограмувати команду „Про програму” головного меню так, щоб під час її виконання на формі з’явилося прізвище автора програми.

12. Вставити поле редагування, створити у головному меню команду „Максимальне значення функції” та запрограмувати її відповідним чином.

13. Вставити поле редагування, створити у головному меню команду „Кількість додатних чисел” або команду „Сума від’ємних чисел” та запрограмувати її відповідним чином.

14. Зберегти створену програму у своїй власній папці.

15. Виконати створену програму.

16. Створити exe - файл програми. Закрити Delphi і запустити створену програму.

Контрольні запитання

1. Як вставити у форму головне меню MainMenu?

2. Як ввести назви команд у головне меню?

3. Які властивості багаторядкового поля редагування ви знаєте?

4. Як запрограмувати деяку команду головного меню?

5. Що означає команда Memo1.Clear?

Поиск по сайту: