Datenbank- Quiz programmieren

[TurboMagic]

Habe mal einen teil deines Codes oben ausgelassen (der aber natürlich nötig ist) und meine Vermutung des
Problems als Kommentar unten eingefügt:

Zitat von Reedx:

Delphi-Quellcode:

     while not Datamodule1.ADOQuery6.Eof do
     begin
       Datamodule1.ADOQuery6.Next;

       //Frage in "Titel"
       rg.Caption:= Datamodule1.ADOQuery6.Fields[0].AsString;
       //Antworten in Radiobuttons
       rg.Items.Clear;
// Hier gibst du nochmal das, was du schon in die Caption geschrieben hast
// im ersten Radiobutton aus. Wirklich ADOQuery6 und nicht 7?
// Vielleicht würde es auch helfen diese Queries besser zu benennen?
// z.B. aus ADOQuery6 ein ADOQuestionQuery und aus der 7 ein ADOAnswerQuery zu machen?
// dnan kannst du die schlechter verwechseln
       rg.Items.Add(Datamodule1.ADOQuery6.Fields[0].AsString);
       rg.Items.Add(Datamodule1.ADOQuery6.Fields[1].AsString);
       rg.Items.Add(Datamodule1.ADOQuery6.Fields[2].AsString);
    end;
  
  
  end else
  begin
  application.MessageBox('Auswahlfehler!','Fehler');
  end;