Hmm..
Hallo Dilip,
Delphi-Quellcode:
type
TFragen = record
Frage : string;
Antwort_1: string;
Antwort_2: string;
Antwort_3: string;
Antwort_4: string;
Richtig : integer;
end;
Da Du ja 16 Fragen brauchst, kannst Du das ganze Record in ein array packen...
so z.B.
Fragenkatalog : array[1..16] of TFragen;
Jetzt kannst Du aus dem Array Deine Fragen etc. auslesen.
Jetzt kannst Du aus dem Array Deine Fragen etc. auslesen.
Da die Fragen beim Original nach Fragenstufe immer schwieriger werden, sollte hier wohl besser eine Dynamische Liste mit TFragen genutzt werden.
z.B:
Delphi-Quellcode:
TFragenListe = array of TFragen;
Fragenkatalog : array[1..16] of TFragenListe;
Dann würde eine je Stufe eine zufällige Frage der entsprechenden Schwierigkeits-Stufe ausgewählt werden.