прога тест

[neprogrammist]

Здравствуйте !
Вобщем задача в том чтобы создать программу "тестовое задание", т.е вопрос и варианты ответа с применением сортировки затем вывести результаты на экран, это оценка тестируемого и колличество баллов.

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

[ImmortalAlexSan]

Если тестируемый пометил вариант ответа (используйте TRadioButton), и нажал на кнопку "Следующий вопрос", то перейти к следующему вопросу: изменить значение TLabel.caption или что вы используете, запоминаете это значение в переменную, как и значение правильного ответа и неправильного ответа. И так до последнего вопроса включая его, по завершению теста, используйте showmessage('ваша оценка: "+inttostr(rez)); где rez-это некоторое среднее (количество правильных ответов делить на количество вопросов умножить на некоторый коэффициент). Это реализуется стандартными средствами дельфи... очень просто.

[neprogrammist]

Сообщение от ImmortalAlexSan

Если тестируемый пометил вариант ответа (используйте TRadioButton), и нажал на кнопку "Следующий вопрос", то перейти к следующему вопросу: изменить значение TLabel.caption или что вы используете, запоминаете это значение в переменную, как и значение правильного ответа и неправильного ответа. И так до последнего вопроса включая его, по завершению теста, используйте showmessage('ваша оценка: "+inttostr(rez)); где rez-это некоторое среднее (количество правильных ответов делить на количество вопросов умножить на некоторый коэффициент). Это реализуется стандартными средствами дельфи... очень просто.

я непонял как сделать так чтобы программа подсчитывала верные и неверные значения, showmessage - это процедура или функция? как ёё объявить? на какой именно коэффициент?

[ImmortalAlexSan]

Вот смотрите...

Var right,wrong:integer; //переменные отвечающие за правильные и неправильные ответы
begin
If <ваш TRadioButton который считается правильным>.checked=true then
inc(right); //увеличиваем переменную правильных ответов на 1
end;

А как определить тот ли радиобаттон активен или нет? Очень просто. Я бы создал потомок класса:

type
MyButtonR=class(Tradionbutton)
public
FRight:boolean;
property right:boolean read FRight write FRight;
end;

теперь вы программно должны создать компонент того типа который описали)) Смотрите в инэте там много инфы про это. И далее в программе можете использовать его новое свойство такое как MybuttonR.Right:=true/false, если для определенного радиобаттона это свойство является TRUE то тогда он и есть верный, и именного его нужно написать в первом приведенном коде. А можно в виде цикла проверки сделать или потока, а не просто линейным кодом писать с каждым разом меняя какие-то свойства. Но это уже больше похоже на "напишите мне программу". Вобщем что непонятно ещё спрашивайте. Удачи)

[neprogrammist]

я непонял как с радиобаттонами работать чтобы сохранялись значения.
я сделал кое что, помогите с кодом пожалуйста

[ImmortalAlexSan]

neprogrammist, ну за чем столько окон? Скачал ваш проект, посмотрю попозже.

[neprogrammist]

Большое спасибо , но с прогресс баром это лишнее )
procedure TForm1.FormCreate(Sender: TObject) что означает этот класс?

[Пепел Феникса]

какой класс?
вообще это событие OnCreate формы(вызывается при создании формы, но после создания дочерних компонент)

[neprogrammist]

Сообщение от Пепел Феникса

какой класс?
вообще это событие OnCreate формы(вызывается при создании формы, но после создания дочерних компонент)

аа понятно

[neprogrammist]

Сообщение от ImmortalAlexSan

neprogrammist, ну за чем столько окон? Скачал ваш проект, посмотрю попозже.

а что означает "right:=0;
wrong:=0;" ??