Загрузка ответов из БД в RadioGroup

[zayka1309]

Помогите пожалуйста! Не загружаются ответы в RadioGroup! Не появляется при запуске в панели RadioGroup вообще ничего!
Вот код:

//вопросы
form8.ADOQuery1.SQL.Clear;
form8.ADOQuery1.SQL.Add('Select TOP 30 vopros as vopros, id_vopros from Vopros where id_predm=2 order by NEWID()');
form8.ADOQuery1.ExecSQL;
form8.ADOTable1.Active:=False;
form8.ADOTable1.Active:=True;
form8.ADOQuery1.Open;
with form8.ADOQuery1 do begin
form8.Memo1.Lines.Clear;
form8.Memo1.Lines.Add(form8.ADOQuer y1.FieldByName('vopros').AsString);
end;
id:=form8.ADOQuery1.FieldByName('id _vopros').AsInteger;

//ответы
form8.ADOQuery2.SQL.Clear;
form8.ADOQuery2.SQL.Add('Select * from PravOtv where id_vopros=:id');
form8.ADOQuery2.ExecSQL;
form8.ADOTable2.Active:=False;
form8.ADOTable2.Active:=True;
form8.ADOQuery2.Open;
with form8.ADOQuery2 do
begin
while not Eof do
begin
form8.RadioGroup1.Items.Add(form8.A DOQuery2.FieldByName('otvet').AsStr ing);
Next;
end;
end;

end;

[Black Fregat]

Так параметр в запросе автоматически не свяжется с переменной, его нужно заполнить

form8.ADOQuery2.Parameters.ParamByName('id').Value:=id;

[Аватар]

и ExecSQL для выборки не нужен