miquellg
22-08-2008, 11:34:09
Hola amig@s,
Estoy implementando una aplicación donde el resultado de una AdoQuery lo envio a una hoja Excel a través de la función:
procedure DoExportFile(AExport: TDataExport; AExtencion : String; Nom:TFileName);
begin
AExport.GetFields.Assign( Fini.DBGaux.Columns );
AExport.SaveToFile(ChangeFileExt( Nom , AExtencion ) );
end;
Esto funciona bien con 1 query.
Pero ahora necesito enviar el resultado de 2 querys a 1 archivo excel, colocando cada query en una hoja diferente. Creo que no puedo hacerlo con el procedimiento anterior o si?
Se aceptan propuestas.
muchas gracias
Estoy implementando una aplicación donde el resultado de una AdoQuery lo envio a una hoja Excel a través de la función:
procedure DoExportFile(AExport: TDataExport; AExtencion : String; Nom:TFileName);
begin
AExport.GetFields.Assign( Fini.DBGaux.Columns );
AExport.SaveToFile(ChangeFileExt( Nom , AExtencion ) );
end;
Esto funciona bien con 1 query.
Pero ahora necesito enviar el resultado de 2 querys a 1 archivo excel, colocando cada query en una hoja diferente. Creo que no puedo hacerlo con el procedimiento anterior o si?
Se aceptan propuestas.
muchas gracias