DruckenMister WongFacebook

StringGrid-Inhalt nach Excel exportieren
System Win9x, WinNT, Win2000, WinXP, Vista, Win7
Ab Delphi-Version Delphi 1
Letzte Änderung 28.09.2010

Oft kommt es vor, dass Daten, die in einer eigenen Anwendung verwaltet werden, zusammengefasst und ausgewertet werden sollen. Dazu bietet sich die Verwendung von Standardsoftware wie Excel an. Excel bietet hierzu eine Schnittstelle zur Automatisierung an. Details können auch im Tutorial OLE-Automation von MS Office nachgelesen werden.Folgendes Code-Beispiel exportiert den Inhalt eines StringGrids in ein Excel-Sheet.

Ein Worksheet kann je nach Excel-Programmversion nur eine bestimmte Anzahl von Spalten und Zeilen aufnehmen. Deshalb kann es erforderlich sein, dass die Daten des TStringGrid auf mehrere Workbooks und Worksheets aufgeteilt werden müssen. Wie das funktionieren kann, zeigt das folgende Code-Beispiel.


procedure TTestDialog.ExportButtonClick(Sender: TObject);
begin
  ExportStringGridToExcel(DataStringGrid);
end;

procedure TTestDialog.SaveButtonClick(Sender: TObject);
begin
  if WriteStringGridToExcelFiles(DataStringGrid, 'C:Test') then
    MessageDlg('Tabelle wurde gespeichert.', mtInformation, [mbOk], 0)
  else
    MessageDlg('Tabelle konnte nicht gespeichert werden', mtError, [mbOk], 0);
end;
 

Weitere Informationen zur OLE-Automation von Excel können auch im Tipp Excel mit OLE-Automation steuern nachgelesen werden.

Ähnliche Seiten: