Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   DBgrid A Excel con formato (https://www.clubdelphi.com/foros/showthread.php?t=15745)

Caracolg 03-11-2004 19:10:46

DBgrid A Excel con formato
 
SALUDOS. Esta es mi primer pregunta al foro. No encuentro la solución. Quiero pasar un dbgrid a excel, ya lo logré, pero ahora quiero darle formato desde Delphi. Insertarle unas tres líneas para títulos. Eliminarle los decimales, y centrarlo. Muchas gracias, espero puedan ayudarme.:)

delphi.com.ar 03-11-2004 21:04:10

¿Qué has utilizado para crear el Excel?

Caracolg 03-11-2004 21:42:13

Este es el código que utilze.

procedure TForm3.BitBtn2Click(Sender: TObject);
Var
Excel,hoja: Variant;
begin
DM.Table2.Active:=False;
If FileExists('tempo.xls') Then DeleteFile('tempo.xls');
if FileExists('tempo.dbf') Then DeleteFile('tempo.dbf');
DM.Table2.BatchMove(dm.Query2,batcopy);
DM.Table2.Active:=True;
CopyFileTo('tempo.dbf','tempo.xls');
DM.Table2.Active:=False;
if not VarIsEmpty(Excel) then
Excel.Quit;
Excel:= CreateOleObject('Excel.Application');
Excel.Visible := True;
Excel.Workbooks.Open(GetCurrentdir+'\'+'tempo.xls',1);
end;

Pero no me gusta el formato en que lo pasa a Excel. Espero puedan ayudarme. Muchas gracias. De verdad les agradezco :)

Caracolg 04-11-2004 22:47:27

Lo he solucionado
 
Muchas gracias, ya lo he resuelto. Tuve que cambiar todo mi codigo. Hacer el formato que quería aparte, y llenarlo con un for. Muchisimas gracias por su atención. :p


La franja horaria es GMT +2. Ahora son las 11:51:50.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi