Zum Beispiel könntest du dir ein Array mit den ganzen Fragen machen:
Delphi-Quellcode:
type
// Typ für eine Frage definieren
TFrage = record
Frage : String;
Antwort1 : String;
Antwort2 : String;
Antwort3 : String;
end;
const
Fragen = Array[0..2] of Fragen = (
(Frage: 'Frage1';Antwort1: 'Wähle 1'; Antwort2: 'Wähle 2'; Antwort3: 'Wähle 3'),
(Frage: 'Frage1';Antwort1: 'Wähle 1'; Antwort2: 'Wähle 2'; Antwort3: 'Wähle 3'),
(Frage: 'Frage1';Antwort1: 'Wähle 1'; Antwort2: 'Wähle 2'; Antwort3: 'Wähle 3'));
Jetzt definierst du dir in deinem Formular zwei Variablen (oder auch mehr). Eine für die Punkte und eine für die aktuelle Frage.
Wenn FrageIndex deine aktuelle Frage ist, kannst du diese mit folgendem Code anzeigen lassen:
Delphi-Quellcode:
FrageLabel.Caption:=Fragen[FrageIndex].Frage;
Antwort1Box.Caption:=Fragen[FrageIndex].Antwort1;
Antwort2Box.Caption:=Fragen[FrageIndex].Antwort2;
Antwort3Box.Caption:=Fragen[FrageIndex].Antwort3;