Anfänger Problem - Psychologietest

[Tormentor32]

Du solltest jeder Kategorie einen Zahlenwert zuordnen logischerweise:

-depressiver -> 0
-hysterischer -> 1
-zwanghafter -> 2
-schizoider -> 3

Das definierst du dann als Konstanten

Delphi-Quellcode:

const
  depressiv = 0;
  hysterisch = 1;
  zwanghaft = 2;
  schizoid = 3;

Jetzt sieht eine Frage so aus

Delphi-Quellcode:

type
  TFrage = record
    Frage: string;
    Kategorie: byte;
    IndexDerFrageZumGegenrechnen: integer;
    GewaehlteAntwort: byte;
  end;

Jetzt Kannst du zum Beispiel mitFragen[0].Kategorie := hysterisch einfach eine Kategorie zuweisen. In gewählte Antwort wird gespeichert, was der Benutzer gewählt hat, und hinterher, wenn der test fertig ist, kannst du das ganze einfach mit einer Schleife auswerten.

Klar soweit?