Работа с диалоговыми окнами

Вывод диалогового окна с кнопкой ок и текстом — ShowMessage(‘Информационное ‘+#13#10+’сообщение’);  Примечание: данная команда приостанавливает выполнение других команд пока не будет нажата кнопка ок,разбиение текста на несколько строчек происходит с помощью команды — +#13#10+ если нужна одна строчка команда упускается
Выводит присвоенное чему либо какое-то значение в маленьком окне — ShowMessage(IntToStr(X)); // var X : Integer, иначе может быть ошибка компиляции.
Вывод окна ввода с предложением ввести значение переменной (задается тут же) — s:=InputBox(‘Фунты-килограммы’,’Введите вес в фунтах’,’0′);
Для строковой переменной типа String — ShowMessage(X); Будет выводиться значение присвоенное иксу. X должен быть переменной типа String.

// Отображение диалога с подтверждением
buttonSelected := MessageDlg(‘Confirmation’,mtError, mbOKCancel, 0); // var buttonSelected : Integer;

// Показ типа выбранной кнопки
if buttonSelected = mrOK     then ShowMessage(‘Была нажата OK’);
if buttonSelected = mrCancel then ShowMessage(‘Была нажата Cancel’);

mtWarning — Отображает символ восклицания
mtError — Отображает красный «Х»
mtInformation — Отображает «i» в круге
mtConfirmation — Отображает знак вопроса
mtCustom — Отображает только сообщение

mbYes — Отображает кнопку «Yes»
mbNo — Отображает кнопку «No»
mbOK — Отображает кнопку «OK»
mbCancel — Отображает кнопку «Cancel»
mbAbort — Отображает кнопку «Abort»
mbRetry — Отображает кнопку «Retry»
mbIgnore — Отображает кнопку «Ignore»
mbAll —    Отображает кнопку «All»
mbNoToAll — Отображает кнопку «No to all»
mbYesToAll — Отображает кнопку «Yes to all»
mbHelp — Отображает кнопку «Help»

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *