Erstellen, bearbeiten, pruefen, berechnen und exportieren Sie Excel-Arbeitsmappen direkt aus Delphi- oder C++Builder-Code. HotXLS ist eine native Object-Pascal-Bibliothek fuer XLS und XLSX, entwickelt fuer Desktop-Tools, Batchauftraege, Berichte und Dokumenterzeugung ohne Microsoft-Excel-Automatisierung.
Dieser Artikel richtet sich an teams moving datasets from Delphi applications into customer-ready workbook reports. Er behandelt database export to spreadsheet reports als produktive Dokumenttechnik und nicht als kurzen Komponentenaufruf.
Das praktische Risiko besteht darin, dass a dataset dump is not a report when type conversion, null handling, totals, grouping, sorting, and workbook styling are not part of the export contract. Deshalb braucht der Ablauf einen schriftlichen Vertrag, nachvollziehbare Diagnosen und reale Regressionsdateien.
Architekturentscheidungen
Treat the dataset schema as a workbook contract. field-to-column mapping, captions, order, grouping, and sort rules / null, date, time zone, currency, decimal, and Boolean formatting
- field-to-column mapping, captions, order, grouping, and sort rules
- null, date, time zone, currency, decimal, and Boolean formatting
- formula totals, subtotals, filters, frozen panes, and table-like navigation
- streaming, pagination, and memory policy for large result sets
Implementierungsablauf
Map database fields to worksheet semantics. The order below keeps the workflow reviewable for Delphi and C++Builder teams.
- derive an export profile from the report requirement and dataset schema
- validate field types and required columns before creating the workbook
- write headers, formats, and formulas before streaming large row groups
- apply filters, freeze panes, totals, and page setup after the data range is known
- compare row counts and key aggregates with the source query
Validierungsnachweise
Export diagnostics for support and finance teams. Keep these fields with the output or support record.
- query identifier, field mapping, row count, column count, and export profile
- null and data-type conversions, locale profile, and formula summary
- source aggregate totals compared with workbook totals
- warnings for truncated text, unsupported types, or memory-limit fallback
Types matter more than cell values
Database export needs explicit mapping from field types to worksheet cells, number formats, formulas, totals, and visible labels. Without that mapping, users receive a workbook that looks correct but behaves poorly in analysis.
Implementierungshinweise für die Produktion
Behandle HotXLS: database export to spreadsheet reports in Delphi als klaren Servicevertrag rund um die HotXLS-Aufrufe, mit getrennten Schritten für Eingabeprüfung, Arbeitsmappenaufbau, Ausgabekontrolle und Support-Evidenz
- Datenquelle, Zellbereiche und Ausgabeformat festlegen, bevor die Arbeitsmappe erzeugt wird
- Zeilenanzahl, Blattanzahl, Warnungen und Ausgabepfad in ein prüfbares Support-Protokoll schreiben
- Anwendungsspezifische Details in testbare Helper kapseln, statt sie in UI-Ereignissen zu verteilen
- Die gespeicherte Datei erneut öffnen oder prüfen, bevor sie an ein anderes System oder an Kunden geht
Fehlerfälle, die getestet werden sollten
- Ein erfolgreicher SaveAs-Aufruf beweist noch nicht, dass der fachliche Vertrag stimmt
- Schriftarten, Rechte und regionale Einstellungen können auf Servern anders sein als auf Entwicklerrechnern
- Logs dürfen keine Passwörter, Kundendaten oder internen Links offenlegen
Ausführliches Delphi-Beispiel
Das folgende Beispiel zeigt eine praktische Servicegrenze für dieses Thema und hält Policy, Logging und Validierung testbar getrennt
procedure ExportCustomerReport(DataSet: TDataSet; const OutputFile: string);
var
Wb: TXLSXWorkbook;
Sh: IXLSWorksheet;
RowIndex: Integer;
begin
RequireOpenDataSet(DataSet);
Wb := TXLSXWorkbook.Create;
try
Sh := Wb.Sheets[0];
Sh.Name := 'Customers';
WriteHeaderRow(Sh, ['CustomerId', 'Name', 'Region', 'Balance', 'LastOrder']);
RowIndex := 2;
DataSet.First;
while not DataSet.Eof do
begin
Sh.Range['A' + IntToStr(RowIndex)].Value := DataSet.FieldByName('CustomerId').AsString;
Sh.Range['B' + IntToStr(RowIndex)].Value := DataSet.FieldByName('Name').AsString;
Sh.Range['C' + IntToStr(RowIndex)].Value := DataSet.FieldByName('Region').AsString;
Sh.Range['D' + IntToStr(RowIndex)].Value := DataSet.FieldByName('Balance').AsCurrency;
Sh.Range['E' + IntToStr(RowIndex)].Value := DataSet.FieldByName('LastOrder').AsDateTime;
Inc(RowIndex);
DataSet.Next;
end;
Sh.Range['A1:E1'].ApplyBuiltinStyle(xbsTitle);
ApplyDateAndCurrencyFormats(Sh, RowIndex - 1);
AddAutoFilterToHeader(Sh, 'A1:E' + IntToStr(RowIndex - 1));
WriteExportManifest(Wb, DataSet, RowIndex - 2);
if Wb.SaveAs(OutputFile) <> 1 then
RaiseWorkbookSaveError(OutputFile);
finally
Wb.Free;
end;
end;
Produktionscheckliste
- Run the workflow on an empty workbook, a normal customer workbook, and a worst-case workbook
- Open the output with the target spreadsheet application or downstream importer
- Log product version, template version, profile, row count, output path, elapsed time, and warning count
- Keep passwords, temporary files, customer data, and support bundles under explicit retention rules
- Add regression workbooks when a customer file exposes a new edge case