4 Введення і виведення даних

Виведення інформації Виведення інформації завжди має на увазі виведення рядків тексту. Тому для виведення числових констант і змінних їх необхідно перетворювати в текст наступними функціями:

IntToStr (ціле число);

FloatToStr(дійсне число);

Для виведення інформації на екран використовується процедура

ShowMessage(const Msg: string);

Тут MSG – рядок тексту, увязнена в апострофи, або сукупність рядків, сполучених знаком +.

Можна проводити виведення числових даних, символів, рядків, арифметичних виразів, елементів масивів, полів записів і інших даних. Але заздалегідь всі вони повинні бути перетворені в строкову константу відповідними функціями.

Приклад.

ShowMessage (‘Число сторін =’+IntToStr(5));

ShowMessage (‘Довжина сторони =’+FloatToStr(5.25));

Для висновку можна використовувати деякі компоненти форми, у яких є властивість CAPTION.

Form1.Caption:=’X=’+IntToStr(78);

Label1.Caption:=’Y=’+FloatToStr(567.89);

Компонент EDIT спеціально передбачений для введення і висновку. Для висновку можна використовувати його властивість TEXT

Edit1.Text := FloatToStr(-667.98);

Функція MessageDlg більш універсальна. Вона дозволяє помістити у вікно з повідомленням один із стандартних значків, наприклад «Увага», задати кількість і тип командних кнопок і визначити, яку з кнопок натиснув користувач

Звернення до функції MessageDlg в загальному вигляді:

Вибір :=MessageDlg (повідомлення, тип повідомлення, кнопки, довідка);

де: повідомлення - текст повідомлення (рядок символів);

тип повідомлення, кнопки - задають вигляд повідомлення, кількість і тип командних кнопок для відповіді користувача.

Таблиця 8 Константи типів повідомлення функції MessageDlg

Константа	Тип повідомлення	Значок
mtlnformation	Інформація
mtWarning	Увага
mtCustom	Звичайне повідомлення	Без значка
mtError	Помилка
mtConfirmation	Запит підтвердження

Кнопки - це список кількості і виду кнопок вікна повідомлення. Список може складатися з декількох розділених комами іменованих констант - типів кнопок. Весь список замикається в квадратні дужки.

Таблиця 7 Список іменованих констант - типів кнопок

Константа	Напис на кнопці	Визначає
mbYes	Yes	Так
mbAbort	Abort	Припинити
mbNo	No	Hет (відмова)
mbAll	All	Все (для всіх)
mbCancel	Cancel	Відмінити
mblgnore	Ignore	Ігнорувати
mbRetry	Retry	Повторити
mbOk	OK	Добре (згода)
mbHelp	Help	Допомога (довідка)

Наприклад, для того, щоб у вікні повідомлення були присутні кнопки «Cancel», «Abort», «Ignore», список кнопки повинен складатися з 3-х констант: [mbCancel, mbAbort, mblgnore].

Функція MessageDlg може використовувати також ще три константи: mbAbortRetryIgnore, mbYesNoCancel, mbOkCancel. Вони визначають комбінації командних кнопок, які часто використовуються в діалогових вікнах.

Довідка - це параметр, який визначає номер екрану довідкової системи, який з'являється при натисненні на клавішу F1 в той час, коли вікно повідомлення знаходиться на екрані дисплея. Якщо використання довідкової системи не передбачається, то у функції MessageDlg параметр «довідка» повинна дорівнювати нулю.

Значення функції MessageDlg дозволяє визначити, яка з командних кнопок була натиснута. У таблиці 8 приведено перелік констант, які ідентифікують натиснуту кнопку.

Таблиця 8 Константи, які ідентифікують натиснуту кнопку

Константа	Діалог завершений натисненням кнопки
mrYes	Yes
mrAbort	Abort
mrNo	No
mrAU	All
mrCancel	Cancel
mrlgnore	Ignore
mrRetry	Retry
mrOk	OK

Висновок в полі діалогового вікна

Частина діалогового вікна, призначена для виведення інформації називається полем висновку або полем мітки. Для того, щоб в полі висновку з'явився текст, досить привласнити значення властивості Caption цього поля. Властивість Caption поля мітки має символьний тип. Тому, для того щоб вивести в це поле значення числового типа, не обхідний заздалегідь перетворити початкове значення на рядок символів, наприклад;

Labell.Caption := FloatToStr(у);

Введення інформації Введення інформації завжди має на увазі введення рядків тексту. Тому для введення числових констант і змінних їх необхідно після введення рядка перетворювати у відповідний тип наступними функціями:

StrToInt (рядок); - в ціле число

StrToFloat (рядок); - в дійсне число

Для введення використовується функція

InputBox (const ACaption, APrompt, ADefault: string)

Тут ACaption, APrompt, ADefault – рядки тексту, ув’язнені в апострофи, або сукупності рядків, сполучених знаком +, що позначають заголовок вікна введення, підказку, значення за умовчанням.

Приклад.

f:= InputBox(' Введення ',’ Введіть значення Х', '20’);

Потім введене значення треба перетворити до речовинного значення змінної Х.

X:= StrToFloat (f);

Компонент EDIT спеціально передбачений для введення і висновку. Для введення можна використовувати його властивість TEXT

Х := StrToFloat(Edit1.Text).