HotXLS ドキュメント
ホーム 目次 概要

ExportDBGrid メソッド

dbgrid を新規または既存のワークシートにエクスポートします

構文

procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
Newsheet 省略可能な Boolean: True なら dbgrid を新しい Worksheet にエクスポートし、False なら既存の Worksheet にエクスポートします。既定値は True
Row Optional Integer. 行 インデックス
Col Optional Integer. 列 インデックス

使用例

この例では、DBGrid1 および DBGrid2 のデータを含む 2 つのワークシートを持つ Example1.xls ワークブックを作成します 

begin
  GridToXLS1.Workbook := nil; //Clears ブック

  //First dbgrid
  GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //最初のワークシート名を指定します
  GridToXLS1.DBGrid := DBGrid1; //エクスポートする DBGrid を指定します
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //2 番目のワークシート名を指定します
  GridToXLS1.DBGrid := DBGrid2; //エクスポートする DBGrid を指定します
  GridToXLS1.ExportDBGrid;

  GridToXLS1.SaveAs('Example1.xls'); //Saves created ブック へ Example1.xls ファイル
end;
この例では、DBGrid1 および DBGrid2 のデータを含む 1 つのワークシートを持つ Example2.xls ワークブックを作成します 

begin
  GridToXLS1.Workbook := nil; //Clears ブック
  GridToXLS1.WorksheetName := 'DBGrid1 and DBGrid2 sheet'; //ワークシート名を指定します

  //First dbgrid
  GridToXLS1.DBGrid := DBGrid1; //エクスポートする DBGrid を指定します
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.DBGrid := DBGrid2; //エクスポートする DBGrid を指定します
  GridToXLS1.ExportDBGrid(false);

  GridToXLS1.SaveAs('Example2.xls'); //Saves created ブック へ Example2.xls ファイル
end;