Библиотека Интернет Индустрии I2R.ru |
|||
|
Программирование в Delphi. Создание простой тестирующей программыЭта статья покажет вам, как можно использовать в своих программах компоненты закладок Standard и Additional, которые были не рассмотрены в предыдущей статье. Мы попробуем создать программу, которая будет задавать вопросы экзаменуемому и предлагать варианты ответов (кстати, на ее основе можно довольно легко создавать программы типа "О, Счастливчик!"). Итак, приступим. Начнем новый проект (File/New Application). Присвоим свойству Caption формы значение Тестовая программа. Предположим для простоты, что на каждый вопрос будет предложено по четыре варианта ответов, из которых правильным может быть только один. Также, для простоты, ограничим число символов в одном вопросе до 100 (чтобы вопрос помещался на одной строке). Теперь приступим к размещению компонентов на форме, или, как мы это назвали раньше, к дизайну. Для размещения на форме текстовых сообщений хорошо подойдет компонент Label, расположенный на закладке Standard или StaticText, расположенный на закладке Additional. Расположим компонент Label1 на форме. Свойство Caption этого компонента содержит тот текст, который будет выведен на форму. Изменим текст на Вопрос:. Если вам не нравится шрифт, которым написан этот текст, то не отчаивайтесь, его можно очень легко изменить. Щелкнем на свойстве Font в инспекторе объектов. Теперь еще раз на кнопке с тремя точками справа от надписи (TFont). Появится окно Шрифт в котором вы можете по собственному усмотрению изменить шрифт, его стиль, цвет и другие параметры. Сделайте это по своему вкусу. Теперь добавим на форму еще одну "метку" Label2 справа от первой. В нее мы будем помещать текст вопроса. Пока удалим из нее текст (очистим свойство Caption). Для красоты можно обвести область, отводимую под вопрос фаской (Bevel), располагающейся на закладке Additional. Свойство Shape фаски задает ее стиль. Я выбрал стиль bsFrame. Теперь осталось отвести место под ответы и добавить кнопки ОК и Выход. Для ответов в нашем случае больше всего подойдет компонент RadioGroup. Он находится на закладке Standard палитры компонентов. Разместим этот компонент на форме и изменим значение его свойства Caption на Варианты ответов. Свойство Items компонента RadioGroup задает строки, состоящие из переключателей RadioButton. Щелкните на кнопке с тремя точками справа от свойства Items и добавьте четыре строки: Первый, Второй, Третий и Четвертый. Теперь добавим две обычные кнопки Button, и изменим их свойство Caption на OK и Выход и получим что-то похожее на нижеприведенный рисунок:
Теперь приступим к программированию. Кликнув по ссылке вы можете посмотреть на полный текст модуля Unit1 с необходимыми пояснениями. Так как описание каждого отдельного шага займет много места, да и вы уже знаете, как можно писать обработчики событий для различных компонентов. Надеюсь, что комментарии в программе достаточно подробно поясняют каждую команду. Остается добавить, что писались обработчики событий для формы и кнопок. Для формы - использовалось событие FormCreate (создание формы). Это событие возникает при создании формы, оно в нашей программе происходит лишь один раз - во время запуска приложения. Остальные события - по нажатию кнопок. Запустите программу и посмотрите на результат. Довольно неплохо, не так ли?
На этом пока мы закончим. Думаю, что у читателя появилась уверенность в своих силах и способностях и он сможет создавать более сложные программы с использованием рассмотренных компонентов. |
|
2000-2008 г. Все авторские права соблюдены. |
|