Помощничек
Главная | Обратная связь


Археология
Архитектура
Астрономия
Аудит
Биология
Ботаника
Бухгалтерский учёт
Войное дело
Генетика
География
Геология
Дизайн
Искусство
История
Кино
Кулинария
Культура
Литература
Математика
Медицина
Металлургия
Мифология
Музыка
Психология
Религия
Спорт
Строительство
Техника
Транспорт
Туризм
Усадьба
Физика
Фотография
Химия
Экология
Электричество
Электроника
Энергетика

Цель: приобретение практических навыков разработки приложений с использованием встроенных диалоговых окон

Краткие сведения:

Встроенные диалоговые окна ввода-вывода текста

ShowMessage(const Msg : WideString) отображает простое окно сообщения с кнопкой OK. Заголовок окна совпадает с именем выполняемого файла приложения.

1. ShowMessage('Работа приложения успешно завершена.');

2. ShowMessage('Задано ' + IntToStr(N1) + ' параметров из ' + IntToStr(N2)); // N1 и N2 - целые переменные содержат соответствующие числа, //которые переводятся в строки функцией IntToStr.

3. ShowMessageFmt(const Msg:WideString; Params:array of const) отображает окно сообщения с кнопкой OK.

4. MessageDlg(const Msg: WideString; AType: TMsgDlgType;AButtons: TMsgDlgButtons; HelpCtx: Longint) отображает диалоговое окно и ожидает ответа пользователя. Сообщение в окне задается параметром функции Msg. Вид отображаемого окна задается параметром AType.

Возможные значения этого параметра:
Параметр Msg задает строку описания формата, а параметр Params задает массив параметров, форматируемых строкой Msg.

Возможные значения этого параметра:

mtWarning - Окно замечаний, содержащее желтый восклицательный знак.

mtError - Окно ошибок, содержащее красный стоп-сигнал.

mtInformation - Информационное окно, содержащее голубой символ "i".

mtConfirmation - Окно подтверждения, содержащее зеленый вопросительный знак. mtCustom - Заказное окно без рисунка. Заголовок соответствует имени выполняемого файла приложения.

Параметр AButtons определяет, какие кнопки будут присутствовать в окне.

Тип TMsgDlgBtns параметра AButtons является множеством, которое включает различные кнопки.

Возможные значения видов кнопок:

mbYes - Кнопка с надписью 'Yes'

mbNo - Кнопка с надписью 'No

' mbOK - Кнопка с надписью 'OK'

mbCancel - Кнопка с надписью 'Cancel'

mbHelp - Кнопка с надписью 'Help'

mbAbort - Кнопка с надписью 'Abort'

mbRetry - Кнопка с надписью 'Retry' mbIgnore - Кнопка с надписью 'Ignore'

mbAll - Кнопка с надписью 'All'

Список необходимых кнопок заключается в квадратные скобки [ ], поскольку параметр AButtons является множеством. Если внутри скобок список отсутствует, в окне не будет ни одной кнопки и пользователю придется закрывать окно системными кнопками Windows. Кроме множества значений, соответствующих отдельным кнопкам, в Delphi определены три константы, соответствующие часто используемым сочетаниям кнопок: Значение Описание

mbYesNoCancel Включает в окно кнопки

Yes, No и Cancel mbOkCancel Включает в окно кнопки OK

Cancel mbAbortRetryIgnore Включает в окно кнопки Abort, Retry и Ignore

Примеры:

if MessageDlg('Действительно хотите закончить приложение?',mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin MessageDlg('Работа приложение закончена', mtInformation, [mbOk], 0);

Close;

end;

Задание 1:

1 - вариант

Hайти минимальное из 5-ти чисел. Вывести результат.

2- вариант

Введите четыре вещественных числа. Определите можно ли построить четырехугольник с длинами сторон, равными этим числам.

3 - вариант

Заданы тарифы на оплату электроэнергии. Если использовано от 1 до 100 киловатт-час (кВт. час), то плата А рублей за каждый кВт. час. Если использовано больше 100 кВт. час, то за каждый кВт. час от 101 до 200 - плата B руб. а за каждый кВт. час свыше 200 - плата C руб. Составьте программу, вычисляющий, сколько надо заплатить за ис­пользование N кВт. часов электроэнергии.

4 - вариант

Решить невырожденное (т.е. а¹0) квадратное неравенство ax2+bx+c>0.

5 - вариант

Ввели 6-ти значное число. Является ли оно счастливым, т.е. равна ли сумма первых 3-х цифр сумме 3-х последних.

6 - вариант

Ввели 6-ти значное число. Является ли оно перевертышем, т.е. одина­ково читается как справа налево, так и слева направо.

7 - вариант

Заданы тарифы на перевозки грузов. За перевозку тонны груза на расстояние от 1 до 1000 километров (км) плата А рублей за каждый км. Если груз перевозится на расстояние больше 1000 км, то за каждый км от 1001 до 2001 перевозка тонны груза стоит B рублей за каждый км., а за каждый км свыше 2000 перевозка тонны груза стоит C руб. за км. Составьте алгоритм, вычисляющий, сколько надо заплатить за пере­возку одной тонны груза на N км.

8 - вариант

Электронные часы показывают P часов, M минут, S секунд. Напишите программу, вычисляющую время в часах, минутах и секундах, которое будут показывать часы через 2 минуты 10 секунд.

9 - вариант

Поле шахматной доски определяется парой (m, n) натуральных чисел (m от 1 до 8, n от 1 до 8). Первое число - номер строки (номер гори­зонтали), второе число - номер столбца (номер вертикали). Даны натураль­ные числа k, l, m, n, каждое из которых не больше 8. Определить, угрожает ли полю (m,n) ферзь, находящийся на поле (k,l).

10 - вариант

В кассе имеются только 3-х и 5-ти рублевые купюры (как это было в 1980 году). Составить программу, которая бы "выплачивала" такими купю­рами любую сумму более 7 рублей.

11 - вариант

Ввести коэффициенты квадратного трехчлена, вывести значения корней квадратного уравнения. В случае, если корни не существуют выдать сообщение.

12 - вариант

Можно ли коробку размером a´b´c упаковать в посылку размером r´s´t? «Углом» укладывать нельзя.

13 - вариант

Можно ли на прямоугольном участке застройки размером a´b разместить два дома размерами p´q и r´s метров? Дома можно располагать только параллельно сторонам участка.

14 - вариант

Для данного натурального числа проверить, делится ли оно на числа: 2, 3, 5, 6, 9.

15 - вариант

По введенному номеру группы выдать сообщение: на каком факультете и на каком курсе учится студент

Задание 2:

1 – вариант

Кузнечик находится в центре круглого стола. Затем он делает N прыжков на се-вер, потом E прыжков на восток, потом S прыжков на юг, потом W прыжков на запад. Определить, остался ли кузнечик на столе после всех прыжков.

2 – вариант

Все стены дома имеют длину 5 м. Человек прошел от юго-восточного угла домаАметров на юг, В метров на восток и С метров на север и посмотрел на свой дом. Написать программу, которая определяет, какие стены (северную, западную, южную, восточную) увидит человек.

3 - вариант

Человек находится в центре поля, ограниченного рвом, со сторонами параллелными сторонам света. Он задумал выполнить сначала N шагов на север, потом E - на восток, потом S - на юг, потом W - на запад. Сможет ли человек выполнить задуманное?

4 - вариант

Автомат проводит кистью по отрезку [10,80] от точки A до точки B, а потом от точки C до точки D. Написать программу, которая определяет, какая часть отрезка окрашена.

5 –вариант

Тонкая синяя стена высотой 3 м и длиной 6 м (ось X) и тонкая зеленая стена вы-сотой 3 м и длиной 3 м (ось Y) образуют прямой угол. Что увидит человек, сто-ящий в точке с целочисленными координатами X, Y и смотрящий в сторону угла (начала координат)?

6 - вариант

Шоссе соединяет пункт А и B по прямой. АТС находится в точке С. Радио-телефон может работать на расстоянии N метров от АТС. Можно ли поговорить на дороге из А в B? Если да, то на каком расстоянии от пункта А лучше всего ве-сти переговоры?

7 – вариант

Даны целые числа а и с. Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями.

8 - вариант

Определить, равен ли квадрат заданного трехзначного числа кубу суммы цифр этого числа.

9 - вариант

Определить, является ли целое число N четным двузначным числом.

10 - вариант

Услуги телефонной сети оплачиваются по следующему правилу: за разговоры до А минут в месяц оплачиваются В р., а разговоры сверх установленной нормы оплачиваются, из расчета С р. в минуту. Написать программу, вычисляющую плату за пользование телефоном для введенного времени разговоров за месяц.

11 - вариант

Грузовой автомобиль выехал из одного города в другой со скоростью v1 км/ч. Через t ч в этом же направлении выехал легковой автомобиль со скоростью v2 км/ч. Составить программу, определяющую, догонит ли легковой автомобиль грузовой через 1 ч после своего выезда.

12 - вариант

Составить программу, определяющую результат гадания на ромашке — «любит — не любит», взяв за исходное данное количество лепестков.

13 – вариант

Вычислите площадь кольца. Программа должна проверять правильность исходных данных.

14 – вариант

Найдите решение уравнения ах + b = 0, если оно существует

15 – вариант

Выясните, попадает ли точка М(x, y) в круг радиусом r с центром в точке (x0,y0).

 

Контрольные вопросы:

 

1. Какие диалоговые окна используются

2. Формат ShowMessage

 


 




©2015 studopedya.ru Все права принадлежат авторам размещенных материалов.