HotXLS-dokumentation
Startside Indhold Oversigt

ExportDBGrid metode

Exports the dbgrid to new or existing Worksheet

Syntaks

procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
Newsheet Valgfri Boolean. True – eksportér dbgrid til et nyt regneark; False – eksportér dbgrid til et eksisterende regneark. Standardværdien er True
Row Optional Integer. Row index
Col Optional Integer. Column index

Eksempel

Eksemplet opretter projektmappen Example1.xls med to regneark, der indeholder data fra DBGrid1 og DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears Workbook

  //First dbgrid
  GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Angiver the name for first Worksheet
  GridToXLS1.DBGrid := DBGrid1; //Angiver the dbgrid for export
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Angiver the name for second Worksheet
  GridToXLS1.DBGrid := DBGrid2; //Angiver the dbgrid for export
  GridToXLS1.ExportDBGrid;

  GridToXLS1.SaveAs('Example1.xls'); //Saves the created Workbook into Example1.xls file
end;
Eksemplet opretter projektmappen Example2.xls med ét regneark, der indeholder data fra DBGrid1 og DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears Workbook
  GridToXLS1.WorksheetName := 'DBGrid1 and DBGrid2 sheet'; //Angiver the name for Worksheet

  //First dbgrid
  GridToXLS1.DBGrid := DBGrid1; //Angiver the dbgrid for export
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.DBGrid := DBGrid2; //Angiver the dbgrid for export
  GridToXLS1.ExportDBGrid(false);

  GridToXLS1.SaveAs('Example2.xls'); //Saves the created Workbook into Example2.xls file
end;