Twórz, edytuj, sprawdzaj, obliczaj i eksportuj skoroszyty Excel bezpośrednio z kodu Delphi lub C++Builder. HotXLS to natywna biblioteka Object Pascal z kodem źródłowym dla przepływów XLS i XLSX, przeznaczona do narzędzi desktopowych, zadań batch, systemów raportowych i generowania dokumentów po stronie serwera bez automatyzacji Microsoft Excel.
Ten artykuł jest przeznaczony dla teams moving datasets from Delphi applications into customer-ready workbook reports. Traktuje database export to spreadsheet reports jako produkcyjną inżynierię dokumentów, a nie pojedyncze wywołanie komponentu.
Praktyczne ryzyko polega na tym, że 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. Dlatego przepływ wymaga spisanego kontraktu, obserwowalnej diagnostyki i realistycznych plików regresyjnych.
Decyzje architektoniczne
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
Przebieg implementacji
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
Dowody walidacji
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.
Uwagi wdrożeniowe dla produkcji
Traktuj HotXLS: database export to spreadsheet reports in Delphi jako jawny kontrakt usługi wokół wywołań HotXLS, oddzielając walidację wejścia, zapis skoroszytu, kontrolę wyniku i dowody dla wsparcia
- Ustal źródło danych, zakresy komórek i format wyjściowy przed utworzeniem skoroszytu
- Zapisuj liczbę wierszy, arkusze, ostrzeżenia i ścieżkę wyjściową w możliwym do sprawdzenia logu
- Szczegóły aplikacji zamykaj w testowalnych helperach zamiast w zdarzeniach UI
- Otwórz lub sprawdź zapisany plik przed przekazaniem go do innego systemu lub klienta
Tryby awarii do przećwiczenia
- Udany SaveAs nie dowodzi, że kontrakt biznesowy nadal jest poprawny
- Czcionki, uprawnienia i ustawienia regionalne mogą różnić się między serwerem a maszyną deweloperską
- Logi nie mogą ujawniać haseł, danych klientów ani linków wewnętrznych
Szczegółowy przykład Delphi
Poniższy przykład Delphi pokazuje praktyczną granicę usługi dla tego tematu, z polityką, logowaniem i walidacją w warstwie możliwej do testowania
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;
Lista produkcyjna
- 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