Mach dir einmal Gedanken, was für Informationen du pro Frage in der Ini-Datei speichern musst, dann ergibt sich der Aufbau fast von selber.
Danach erstelle dir Methoden, die einfache Dinge erledigen:
Delphi-Quellcode:
TFrageForm = class( TForm )
...
private
procedure ZeigeFrageAn( FrageIndex : Integer );
function IstDieFrageRichtigBeantwortet( FrageIndex, AntwortIndex : Integer ): Boolean;
end;
Diese Methoden kann man dann sehr einfach für den Spielfluss verwenden:
Nach dem Drücken auf
Weiter prüft man ob die Frage richtig beantwortet war und merkt sich das Ergebnis und lässt sich die nächste Frage anzeigen.
Delphi-Quellcode:
procedure TFrageForm.WeiterButtonClick(Sender: TObject);
begin
{AntwortSpeicher - selber überlegen} := IstDieFrageRichtigBeantwortet( AktuelleFrageIndex, AntwortIndex );
AktuelleFrageIndex := HoleNaechsteFrage;
ZeigeFrageAn( AktuelleFrageIndex );
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)