[Voron]

Проблема решена!

Код:

procedure TCForm.RecuestViewDblClick(Sender: TObject);
var i:integer;
begin
for i:=0 to r-1 do
begin
if Zapros[i].Name=RecuestView.Items[RecuestView.ItemIndex].Caption then
 begin
  
  ADOdch.Close;//закрываю дочерний Query
  ADOgl.Close;//закрываю родительский Query
  ADOgl.SQL.Clear;
  ADOgl.SQL.Add(zapros[i].SQL1);//здесь добавляется первый запрос
  ADOdch.SQL.Clear;
  ADOdch.SQL.Add(zapros[i].SQL2);//----второй запрос
ADOdch.Open;//не знаю почему, но после такой перестановки все заработало как надо
  adogl.Open;
  ADOdch.Close;
  ADOdch.Open;
 
  break;
  end;
 end;
end;