Как сделать викторину в Delphi?

Question

Я должен сделать викторину в школе, но у меня есть проблема с изменением вопросов и ответов, когда пользователь нажимает кнопку, которая отправляет их на следующий вопрос. Я попытался использовать Case, чтобы изменить вопросы, когда они нажимают кнопку, но, похоже, это не работает. Так что теперь я даже не знаю, как запустить программу. У меня есть: Ярлык - Это изменение следующего вопроса, когда пользователь нажимает кнопку. RadioGroup - Это отвечает на вопросы, это тоже нужно изменить. Кнопка - Когда пользователь нажимает на кнопку, меняются RadioGroup и Label. Так что я должен писать, чтобы убедиться, что вопросы меняются, когда пользователи нажимают кнопку? Спасибо.

Answer 1

Структура кода внутри OnClick() может выглядеть следующим образом:

// (1) Save the response selected 
    ... 
    // (2) Increment counter 
    Inc(ActualQuestion); 
    //.. 
    // (3) Get the next Question/Responses 
    GetQuestion(ActualQuestion); 

(1) и (3) будет зависеть от того, как вы сохранили вопросы и ответы.

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