Personalizar exportacion a excel

[xio]

Me he descargado el componente para exportar datos desde delphi. Lo he instalado, pero no se como hacerlo funcionar, podriais darme una pequeña indicacion de como hacerlo?

Mi aplicacion genera unos listados y lo que necesito es esa informacion poder exportarla, pero con formato, no se si con este componente se podria.

Soy bastante nueva en esto, espero que podais ayudarme.

Un saludo y gracias.

PD: Antes de postear por aqui he dado bastantes pasadas por el foro para ver que hay sobre este tema. Y no he encontrado nada que se acomode a lo que busco.

[delphi.com.ar]

Bueno, es bastante sencillo, primero te recomiendo ver el ejemplo "ExportGrid" incluído con los componentes, lo único que tienes que hacer es enlazar la propiedad "DataSet" del componente a utilizar con el DataSet que contenga tus datos, luego si quieres que el archivo exportado conserve el formato de las columnas de un DBGrid, puedes asignarle las columnas de este DBGrid a la propiedad Fields, o Columns, según corresponda (en el ejemplo hace un llamado a la función GetFields, que es una función abstracta implementada en forma polimórfica por cada descendiente), y luego simplemente indicas donde quieres generar el archivo con la función: SaveToFile.

Ejemplo:

Código Delphi [-]
  TfrmMain = class(TForm)
    tblContacts: TTable;
    dsContacts: TDataSource;
    dbgContacts: TDBGrid;
    procedure btnExportClick(Sender: TObject);
  private
  public
  end;
  
var
  frmMain: TfrmMain;

implementation

{$R *.dfm}

procedure TfrmMain.btnExportClick(Sender: TObject);
var
  ADataToXLS: TDataToXLS
begin
  tblContacts.Open ;
  ADataToXLS := TDataToXLS.Create(Self);
  try
    ADataToXLS.DataSet := tblContacts;
    ADataToXLS.GetFields.Assign( dbgContacts.Columns )
    ADataToXLS.SaveToFile('c:\Ejemplo.xls');
  finally
    ADataToXLS.Free;
  end;
end;

Saludos!

[xio]

Gracias por la respuesta, pero a lo que me referia de formato es de tamaño de letra, fuente, negrita, ....

No se si se podrá por eso pregunté.

[delphi.com.ar]

Empezado por xio

Gracias por la respuesta, pero a lo que me referia de formato es de tamaño de letra, fuente, negrita, ....

En ese caso es muy sencillo, puedes utilizar las propiedades Detail, Header, Title para definir en forma genérica los valores de las fuentes de cada "banda", luego puedes utilizar el evento OnGetDetailParams para cambiar los atributos de celdas particulares.

Saludos!

[xio]

Oki lo probaré, por que ahora mismo estoy con otro proyecto, cuando lo haga si tengo alguna duda te comentaré. Un saludo.

[metroyd]

una pregunta. Si yo utilizo este componente y funciona perfecto en mi maquina, que pasa cuando mi aplicacion la instale en otra computadora???? O la corra en otra computadora?? Me seguira funcionando igual? o debo instalar tambien el componente en la otra maquina???

[xio]

Lo que tendras que tener en la otra maquina será el excel instalado para poder leer el fichero que genere tu aplicacion.

Yo aun no he podido realizar el proyecto por que me han encargado otras cosa y no he tenido oportunidad aun.

Un saludo!

[delphi.com.ar]

Empezado por metroyd

una pregunta. Si yo utilizo este componente y funciona perfecto en mi maquina, que pasa cuando mi aplicacion la instale en otra computadora???? O la corra en otra computadora?? Me seguira funcionando igual? o debo instalar tambien el componente en la otra maquina???

No hace falta tener instalado nada en la computadora que corras el programa para generar un archivo de excel, esa es una de las cualidades del componente. Pero si lo necesitaras, como dijo xio si quieres ver el archivo generado.

Saludos!

[ingabraham]

Empezado por delphi.com.ar

En ese caso es muy sencillo, puedes utilizar las propiedades Detail, Header, Title para definir en forma genérica los valores de las fuentes de cada "banda", luego puedes utilizar el evento OnGetDetailParams para cambiar los atributos de celdas particulares.

Saludos!

me podrias dar un ejemplo de como ponerle formato numerico con separadores de mil a determinada columna "valor_total"