Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторна робота 2.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
1.22 Mб
Скачать

2.3.4 Інструкція goto

Інструкції if і case використовуються для переходу до послідовності інструкцій програми залежно від деякої умови. Тому їх іноді називають інструкціями умовного переходу. Крім цих інструкцій управління ходом виконання програми існує ще одна - інструкція безумовного переходу goto.

У загальному вигляді інструкція goto записується таким чином:

goto Мітка

де мітка - це ідентифікатор, що знаходиться перед інструкцією, яка повинна бути виконана після інструкції goto.

Мітка, використовувана в інструкції goto, повинна бути оголошена в розділі міток, який починається словом label і розташовується перед розділом оголошення змінних.

У програмі мітка ставиться перед інструкцією, до якої повинен бути виконаний перехід в результаті виконання інструкції goto. Відразу після мітки ставиться двокрапка.

2.4 Компоненти, які підтримують функції вибору

Компонент TCheckBox (Прапорець) використовується для того, щоб користувач міг вказати своє рішення типу так/ні або так/ні/не упевнений (у останньому випадку прапорець виглядає бляклим). Це рішення відображається у властивості State компоненту, доступній як для читання, так і для запису. У складі діалогового вікна може бути декілька компонентів TCheckBox, причому стан будь-якого з них ніяк не залежить від стану інших.

Деякі прапорці можуть знаходитися також в частково встановленому стані, коли ознака установки прапорця відображається приглушеним кольором. Така можливість потрібна, коли потрібно повідомити користувача про неповну відповідність вказаному статусу (наприклад, в ході установки програм, таким чином, повідомляється, що для установки вибрані не всі доступні засоби).

Розглянемо властивості цього компоненту.

Таблиця 16 Властивості компоненту TCheckBox

Властивість

Опис

type TLeftRight = (taLeftJustify, taRightJustify); property Alignment: TLeftRight;

Визначає положення тексту:

taLeftJustify - з лівого боку компоненту;

taRightJustify - з правого боку

property AllowGrayed: Boolean;

Якщо для властивості задано значення True, то прапорець при послідовних клацаннях на ньому по черзі прийматиме стани: скинутий, встановлений частково, встановлений. Стан визначається значенням властивості State, яку можна змінювати як під час проектування за допомогою інспектора об'єктів, так і в програмі. Це значення cbUnchecked, cbGrayed і cbChecked відповідно. Щоб реагувати на зміну стану прапорця, треба створити обробник події OnClick

property Caption: String;

Містить пов'язаний з компонентом текст

property Checked: Boolean;

Ця властивість приймає значення True, якщо прапорець встановлений, і False, якщо він скинутий. Це головна властивість прапорця

type TCheckBoxState = (cbUnchecked, cbChecked, cbGrayed); property State: TCheckBoxState;

Містить стан компоненту:

cbUnchecked - ні;

cbChecked - так;

cbGrayed - не упевнений

Властивість Color компоненту фактично ігнорується, а властивості Height і Width визначають розміри прямокутника, в якому виводиться пов'язаний з прапорцем текст, і ніяк не впливають на розміри самого прапорця. Текст указується у властивості Caption.

Компонент TRadioButton (Перемикач) призначений для вибору одного значення з ряду можливих. Перемикачі завжди використовуються групами.

Коли користувач вибирає наступний перемикач, те виділення з поточного перемикача автоматично знімається, таким чином, в групі виділений завжди тільки один перемикач.

Розглянемо властивості компоненту TRadioButton.

Таблиця 17 Властивості компоненту TRadioButton

Властивість

Опис

property Alignment: TAlignment;

Ця властивість аналогічно властивості прапорця. Воно визначає положення підпису справа або зліва від перемикача

property Checked: Boolean;

Так само аналогічно властивості прапорця і визначає стан об'єкту (True, якщо перемикач включений)

property Name: String;

Ім'я меню, яке автоматично буде підставлене у властивість меню форми

property Font: TFont;

З його допомогою можна різноманітити вид напису

property Caption: String;

Містить текст

Методи GetChecked і SetChecked, що дозволяють звертатися до властивості Checked і змінювати його значення, в тексті програми явно не використовуються. Вони призначені для використання в успадкованих класах TRadioButton (конкретних реалізаціях перемикача). Для відстежування стану конкретного перемикача можна обробляти подію OnClick.

Компонент TRadioGroup Якщо в програмі потрібно використовувати декілька груп перемикачів (наприклад, одну для вибору типу пристрою, а іншу для вибору його стану), то можна застосувати один з двох підходів. Перший полягає у виділенні для кожної групи спеціального об'єкту (панелі), щоб система Delphi могла зрозуміти, як об'єднуються перемикачі. Другий підхід полягає у використанні компоненту TRadioGroup (Група перемикачів), який об'єднує властивості і методи, що забезпечують підтримку роботи групи перемикачів. Після розміщення у формі компоненту TRadioGroup вхідні в нього перемикачі задаються після переліку їх назв. Ці назви вводяться у властивість Items, що має тип TString.

Розглянемо властивості компоненту TRadioGroup.

Таблиця 18 Властивості компоненту TRadioGroup

Властивість

Опис

property Columns: Integer;

Визначає кількість стовпців перемикачів

property ItemIndex: Integer;

Містить індекс встановленого перемикача

property Items: TStrings;

Містить список рядків із заголовками елементів. Додавання/видалення елементів досягається додаванням/видаленням рядків списку Items

property Caption: TCaption;

Визначає заголовок групи (за умовчанням вона називається RadioGroup1)

Завдання 1 Створити теку, модуль і проект в Delphi, створити блок схему алгоритму, діалогове вікно і програму для обчислення функції.

Варіант

Вид функції

Початкові дані

X

Y

Z

1

1.321

-

0.56

2

0.56

0.25

-

3

0121

0.26

0.15

4

0.5

0.05

0.3

5

0.28

0.2

0.12

6

0.56

0.4

0.11

7

0.7

0.15

1.3

8

1.2

0.7

0.31

9

0.18

1.62

1.56

10

1.61

0.17

0.2

11

1.2

1.08

1.3

12

0.15

2.63

0.98

13

0.6

0.15

3.8

14

0.25

0.8

0.9

15

0.568

-1.2

-

16

2.161

1.35

-1.68

17

2.368

-

0.15

18

1.379

0.21

0.138

19

0.613

2.793

0.5

20

0.523

0.26

1.3

21

3.816

0.153

-

22

-8.217

1.561

0.23

23

0.24

0.12

0.672

24

2.374

-

-0.352

25

1.615

-0.31

0.21

26

3.189

-1.256

-

27

-

-

0.562

28

1.272

0.36

-

29

0.532

0.056

0.2

30

0.612

0.151

0.56

Приклад

Створити теку, модуль і проект в Delphi, створити блок схему алгоритму, діалогове вікно і програму для обчислення функції.

a=0.6, b=1.3, x=0.3, y=0.26,z=1.4