Creez, modifiez, inspectez, calculez et exportez des classeurs Excel directement depuis Delphi ou C++Builder. HotXLS est une bibliotheque native Object Pascal pour XLS et XLSX, concue pour outils bureau, traitements par lots, rapports et generation de documents sans automatisation Microsoft Excel.
Cet article s'adresse à teams producing many workbooks from services, schedulers, APIs, or report farms. Il traite streaming write and server batch jobs comme une ingénierie documentaire de production, et non comme un simple appel de composant.
Le risque pratique est que batch generation can overload memory, leave temporary files, retry unsafe stages, or hide partial output unless job boundaries are explicit. Le flux doit donc produire un contrat écrit, des diagnostics observables et des fichiers de régression réalistes.
Décisions d'architecture
Treat every workbook as an isolated job. job identifier, output destination, retry policy, timeout, and cancellation behavior / temporary file location, cleanup, quota, and retention for failed workbooks
- job identifier, output destination, retry policy, timeout, and cancellation behavior
- temporary file location, cleanup, quota, and retention for failed workbooks
- batch size, concurrency level, progress reporting, and back-pressure
- which validation can run before final upload or delivery
Parcours d'implémentation
Stream output only after validation checkpoints are defined. The order below keeps the workflow reviewable for Delphi and C++Builder teams.
- assign a job identifier and output boundary before opening the workbook writer
- prepare styles, sheets, and headers before streaming row data
- write rows in batches and checkpoint progress for operators
- validate size, sheet count, row count, and key formulas before final delivery
- clean or retain temporary files according to success, cancellation, or failure
Preuves de validation
Batch evidence for operators. Keep these fields with the output or support record.
- job identifier, batch item count, row count, output size, elapsed time, and memory peak
- stage timings for data load, workbook write, validation, save, and upload
- temporary path, cleanup status, retry count, and cancellation reason
- operator-facing failure reason and whether retry is safe
Streaming is a resource policy
Streaming write helps scale workbook generation, but it also limits which parts of the workbook can be revisited later. The job design should decide what must be known before streaming begins.
Notes d'implémentation en production
Traitez HotXLS: streaming write and server batch jobs in Delphi comme un contrat de service explicite autour des appels HotXLS, en séparant validation d'entrée, écriture du classeur, contrôle de sortie et preuves de support
- Définir la source de données, les plages de cellules et le format de sortie avant de créer le classeur
- Consigner le nombre de lignes, les feuilles, les avertissements et le chemin de sortie dans une trace relisible
- Encapsuler les détails applicatifs dans des helpers testables plutôt que dans des événements UI
- Rouvrir ou inspecter le fichier enregistré avant livraison à un autre système ou au client
Défaillances à répéter en test
- Un SaveAs réussi ne prouve pas que le contrat métier est respecté
- Polices, droits et paramètres régionaux peuvent différer entre serveur et poste de développement
- Les journaux ne doivent exposer ni mots de passe, ni données client, ni liens internes
Exemple Delphi détaillé
L'exemple Delphi suivant montre une frontière de service pratique pour ce sujet, avec politiques, journalisation et validation dans une couche testable
procedure RunWorkbookBatch(const Jobs: TArray<TWorkbookJob>);
var
Job: TWorkbookJob;
JobResult: TWorkbookJobResult;
begin
for Job in Jobs do
begin
StartJobAudit(Job.Id, Job.OutputFile);
try
RequireWritableDestination(Job.OutputFile);
RequireTempQuota(Job.TempFolder, Job.ExpectedRows);
JobResult := WriteWorkbookJob(Job);
ValidateWorkbookForDelivery(JobResult.OutputFile, JobResult.ExpectedRows);
CompleteJobAudit(Job.Id, JobResult);
except
on E: Exception do
begin
MarkJobFailed(Job.Id, E.Message, CanRetryWorkbookJob(Job));
CleanupOrRetainTempFiles(Job, E);
raise;
end;
end;
end;
end;
function WriteWorkbookJob(const Job: TWorkbookJob): TWorkbookJobResult;
var
Wb: TXLSXWorkbook;
Sh: IXLSWorksheet;
begin
Wb := TXLSXWorkbook.Create;
try
Sh := Wb.Sheets[0];
Sh.Name := 'Batch Output';
StreamRowsIntoWorksheet(Sh, Job.Reader, Job.Progress);
WriteBatchMetricsSheet(Wb, Job);
if Wb.SaveAs(Job.OutputFile) <> 1 then
RaiseWorkbookSaveError(Job.OutputFile);
Result := BuildWorkbookJobResult(Job);
finally
Wb.Free;
end;
end;
Liste de mise en production
- 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