Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.11.2012, 08:03   #1
Saxxx
Новичок
Джуниор
 
Аватар для Saxxx
 
Регистрация: 24.11.2012
Сообщений: 2
Вопрос Тест в Delphi7.

здравствуйте... Не могли бы вы посоветовать, какой-нибудь сайт на котором пошагово расписано создание простого теста в делфи... Я знаю что на "форм делфи" создать , но вот что в исходном коде написать - не совсем...
Saxxx вне форума Ответить с цитированием
Старый 24.11.2012, 11:44   #2
studen
Пользователь
 
Регистрация: 21.05.2012
Сообщений: 88
По умолчанию

Ключ к решению - компонент RadioGroup, нужна еще кнопка, при нажатии на которую считывался бы ответ на вопрос и заполнялся бы заново RadioGroup.
Если не знаешь, как работать с RadioGroup - сначала гугли, если ничего не будет - пиши.
studen вне форума Ответить с цитированием
Старый 24.11.2012, 12:23   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Я посоветую изучить TIniFiles для работы с базой тестов. Естесственно правильные ответы можно шифровать. Выглядеть работа может так:
1) Методом ReadSections этого класса в переменную типа TStringList считывается список вопросов
2) В цикле по этому списку считывается каждый отдельный вопрос и варианты ответа методом ReadSectionValues, и подаются на тот же вышеуказанный RadioGroup, или же на CheckListBox в случае нужды выбора нескольких ответов.

Сам ини файл теста может выглядеть так:
Цитата:
[Кто здесь?]
1=Я
2=Конь в пальто
3=Конь без пальто

[Где разводят бледных анемонов в условиях крайнего севера?]
1=На севере
2=В штанах сторожа
3=Их не разводят они сами расходятся
Правильные ответы можно хранить в другом ини-файле в зашифрованном виде.
Но если возьмешься делать так пока про шифровку не думай.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 24.11.2012, 13:12   #4
Saxxx
Новичок
Джуниор
 
Аватар для Saxxx
 
Регистрация: 24.11.2012
Сообщений: 2
По умолчанию

Спасибо...Не только за советы, но и за хорошее настроение. (Я про пример вопросов, в виде цитаты)
Saxxx вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Тест Kinect Общие вопросы .NET 2 08.05.2011 23:02
unable to rename 'C:\ProgramFiles\Borland\Delphi7\Bi n\Delphi32.$$$' to 'C:\Program Files\Borland\Delphi7\ KazBoy Помощь студентам 1 12.04.2011 18:07
Delphi7 создать небольшую программу тест -ushёl- Помощь студентам 1 28.03.2010 22:28
Тест 0.5 Лунатик222 Софт 0 03.03.2009 22:20
ТЕСТ Ярослав Помощь студентам 14 18.04.2008 23:37