procedure TFormHighQuery.DBGrid1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_RETURN then
  begin
    if DBGrid1.SelectedField=Query1ID then
    begin
      with Form1.Create(nil) do
      try
        Memo1.Text:=Query1Introduce.AsString;
        Memo2.Text:=Query1Details.AsString;
      Finally
        Free;
      end;
    end;
  end;
end;
小弟在运行找个程序后,选中DBGrid的ID按下回车后总提示acomponent named GroupBox1 already exists(在Form1中有组建GroupBox1)老是调不出来