Datenbank- Quiz programmieren

[Reedx]

ich hab es jetzt so gemacht. Jetzt bleibt die Radiogroupbox aber komplett leer und zeigt weder frage noch antworten an

Delphi-Quellcode:

 for i:= 0 to 10 do
    begin
        Datamodule1.ADOQuery6.First;
        Datamodule1.ADOQuery7.First;
     while (not (Datamodule1.ADOQuery6.Eof) and (Datamodule1.ADOQuery7.Eof)) do
     begin
        Datamodule1.ADOQuery6.Next;
        Datamodule1.ADOQuery7.Next;

    //Frage in "Titel"
      rg.Caption:= Datamodule1.ADOQuery6.Fields[0].AsString;
    //Antworten in Radiobuttons
      rg.Items.Clear;
      rg.Items.Add(Datamodule1.ADOQuery7.Fields[0].AsString);
      rg.Items.Add(Datamodule1.ADOQuery7.Fields[1].AsString);
      rg.Items.Add(Datamodule1.ADOQuery7.Fields[2].AsString);

    end;
       end;
          i:= i+1;