HotXLS: conditional formatting, rich text, and styles

Dieser deutsche Artikel behandelt HotXLS: conditional formatting, rich text, and styles für Teams, die mit Delphi, C++Builder, Lazarus/FPC und losLab-Komponenten arbeiten

Der Fokus liegt auf praxisnahen Entscheidungen, Fallstricken und Prüfpunkten, damit die Lösung im produktiven Einsatz verlässlich bleibt

Architekturentscheidungen

Manage styles as reusable assets. style catalog, theme colors, indexed colors, fonts, borders, and number formats / conditional-rule priority, stop-if-true behavior, and target ranges

• style catalog, theme colors, indexed colors, fonts, borders, and number formats
• conditional-rule priority, stop-if-true behavior, and target ranges
• rich text runs, hyperlink styling, and localization of inline labels
• style reuse policy for generated rows and template-derived sections

Implementierungsablauf

Apply formatting through named profiles. The order below keeps the workflow reviewable for Delphi and C++Builder teams.

1. define style profiles before writing large ranges
2. reuse existing workbook styles when they match the intended appearance
3. apply conditional rules in explicit priority order
4. write rich text runs only where the mixed formatting carries meaning
5. inspect style count and workbook size as part of regression testing

Validierungsnachweise

Formatting evidence for regression review. Keep these fields with the output or support record.

• style count, reused style identifiers, and newly created style profiles
• conditional rule type, priority, target range, and formula or threshold
• rich text run count, font changes, and hyperlink interactions
• visual comparison against approved template output

Workbook formatting has a cost model

Conditional formatting, rich text runs, and cell styles are workbook resources. Reusing styles and explaining rule priority improves performance, file size, and long-term template maintenance.

Implementierungshinweise für die Produktion

Behandle HotXLS: conditional formatting, rich text, and styles 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 BuildKpiWorkbook(const OutputFile: string; const Rows: TArray<TKpiRow>);
var
  Wb: TXLSXWorkbook;
  Sh: IXLSWorksheet;
  RowIndex: Integer;
  Row: TKpiRow;
begin
  Wb := TXLSXWorkbook.Create;
  try
    Sh := Wb.Sheets[0];
    Sh.Name := 'KPI Review';
    WriteHeaderRow(Sh, ['Team', 'Owner', 'Target', 'Actual', 'Status']);

    RowIndex := 2;
    for Row in Rows do
    begin
      Sh.Range['A' + IntToStr(RowIndex)].Value := Row.Team;
      Sh.Range['B' + IntToStr(RowIndex)].Value := Row.Owner;
      Sh.Range['C' + IntToStr(RowIndex)].Value := Row.Target;
      Sh.Range['D' + IntToStr(RowIndex)].Value := Row.Actual;
      Sh.Range['E' + IntToStr(RowIndex)].Value := Row.StatusText;
      Inc(RowIndex);
    end;

    Sh.Range['A1:E1'].ApplyBuiltinStyle(xbsTitle);
    ApplyCurrencyFormat(Sh, 'C2:D' + IntToStr(RowIndex - 1));
    AddTrafficLightRules(Sh, 'E2:E' + IntToStr(RowIndex - 1));
    AddRichTextStatusNotes(Sh, Rows, 2);
    ValidateStyleBudget(Wb, 80);

    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

Product documentation

HotXLS Component

Zusätzliche Codebeispiele

var
  Rich: TXLSXRichText;
  Run: TXLSXRichTextRun;
begin
  Rich := TXLSXRichText.Create;
  Rich.AddRunText('Status: ');
  Run := Rich.AddRunText('OVERDUE');
  Run.Bold := True;
  Run.Color := $FFC00000;
  Run.ColorIsAuto := False;
  Run := Rich.AddRunText(' — escalated to regional manager');
  Run.Italic := True;
  Sheet.Cells[2, 7].RichText := Rich;   // ownership moves to the cell: do not Free
end;

HeaderFont := Book.Fonts.Add('Calibri', 11, True, False);  // pool index, 0-based
for Col := 1 to 6 do
  Sheet.Cells[1, Col].FontIndex := HeaderFont + 1;          // cell index, 1-based