[[Caral]]

Hola
Es Viernes me parece muy bien.
Perdon por la equivocacion, la consulta no da problemas, se puede hacer al reves y al derecho cuantas veces se quiera y no da problemas.
En realidad estaba en esta otra parte:

Código Delphi [-]
procedure TFReporteDiario.Button1Click(Sender: TObject);
begin
 //  revisa si ya fue procesado el reporte
   ADOQuery9.SQL.Add('WHERE ReporteDiario.Fecha =#'+DateToStr(DTP1.DateTime)+'#');
   AdoQuery9.Open;
   if DBEdit26.Text = DateToStr(DTP1.DateTime) then
    begin
   MessageDlg('Este Reporte ya fue Procesado.',mtInformation,[mbOK],0);
  ADOQuery9.Close;
//  Close;
  end
  else
  if MessageBox(Handle,
                PChar('Desea Procesar este Reporte' + #13#10 +
                      'Reporte diario de transacciones'),
                PChar('Reportes'),
                MB_OKCANCEL + MB_DEFBUTTON1 + MB_SYSTEMMODAL) = IDOK then
  begin
   ADOQuery9.Close;
   ADOTable1.Open;
   ADOTable1.Insert;
   DBEdit13.Text:= DateTostr(DTP1.DateTime);
   DBEdit14.Text:= DBEdit1.Text;
   DBEdit15.Text:= DBEdit2.Text;
   DBEdit16.Text:= DBEdit3.Text;
   DBEdit17.Text:= DBEdit4.Text;
   DBEdit18.Text:= DBEdit5.Text;
   DBEdit19.Text:= DBEdit6.Text;
   DBEdit20.Text:= DBEdit7.Text;
   DBEdit21.Text:= DBEdit8.Text;
   DBEdit22.Text:= DBEdit9.Text;
   DBEdit23.Text:= DBEdit10.Text;
   DBEdit24.Text:= DBEdit11.Text;
   DBEdit25.Text:= DBEdit12.Text;
   ADOTable1.Post;

end;
   end;

El problema se presenta, Cuando guardo la informacion en otra tabla, tengo que salir del programa cada vez que guardo la informacion.
Osea Guardo una vez, salgo, guardo y asi, bueno otro problemita.
Me lo chequeais.
Saludos
Saludos