Documentação do HotXLS
Início Conteúdo Visão geral

Método ExportDBGrid

Exporta o dbgrid para uma Planilha nova ou existente

Sintaxe

procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
Newsheet Boolean opcional. True - exporta o dbgrid para uma nova Worksheet; False - exporta o dbgrid para uma Worksheet existente. O valor padrão é True
Row Optional Inteiro. linha índice
Col Optional Inteiro. coluna índice

Exemplo

Este exemplo cria a Pasta de Trabalho Example1.xls com duas Planilhas contendo dados de DBGrid1 e DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears pasta de trabalho

  //First dbgrid
  GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Especifica o nome da primeira planilha
  GridToXLS1.DBGrid := DBGrid1; //Especifica o DBGrid para exportação
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Especifica o nome da segunda planilha
  GridToXLS1.DBGrid := DBGrid2; //Especifica o DBGrid para exportação
  GridToXLS1.ExportDBGrid;

  GridToXLS1.SaveAs('Example1.xls'); //Saves created pasta de trabalho em Example1.xls arquivo
end;
Este exemplo cria a Pasta de Trabalho Example2.xls com uma Planilha contendo dados de DBGrid1 e DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears pasta de trabalho
  GridToXLS1.WorksheetName := 'DBGrid1 and DBGrid2 sheet'; //Especifica o nome da planilha

  //First dbgrid
  GridToXLS1.DBGrid := DBGrid1; //Especifica o DBGrid para exportação
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.DBGrid := DBGrid2; //Especifica o DBGrid para exportação
  GridToXLS1.ExportDBGrid(false);

  GridToXLS1.SaveAs('Example2.xls'); //Saves created pasta de trabalho em Example2.xls arquivo
end;