HotXLS Component: conditional formatting, rich text, and styles في Delphi

أنشئ وحرر وافحص واحسب وصدّر مصنفات Excel مباشرة من كود Delphi أو C++Builder. HotXLS مكتبة جداول Object Pascal أصلية مع المصدر لسير عمل XLS وXLSX، ومناسبة لأدوات سطح المكتب والمهام الدفعية وأنظمة التقارير وتوليد المستندات على الخادم دون أتمتة Microsoft Excel.

هذه المقالة موجّهة إلى teams producing formatted workbook output that must remain editable and visually consistent. وهي تتعامل مع conditional formatting, rich text, and styles كجزء من هندسة المستندات في بيئة الإنتاج، لا كاستدعاء سريع لمكوّن.

الخطر العملي هو أن style-heavy workbooks become slow, bloated, or visually inconsistent when every cell creates a new style or when conditional rules overlap without priority control. لذلك يحتاج المسار إلى عقد واضح وتشخيص قابل للملاحظة وملفات اختبار واقعية.

قرارات البنية

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

مسار التنفيذ

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

أدلة التحقق

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.

ملاحظات تنفيذ للإنتاج

اجعل موضوع «HotXLS Component: conditional formatting, rich text, and styles في Delphi» عقد خدمة واضحا حول استدعاءات HotXLS، مع فصل التحقق من الإدخال وكتابة المصنف وفحص الخرج وأدلة الدعم

• حدد مصدر البيانات ونطاقات الخلايا وتنسيق الخرج قبل إنشاء المصنف
• سجل عدد الصفوف والأوراق والتحذيرات ومسار الخرج في سجل دعم قابل للمراجعة
• ضع التفاصيل الخاصة بالتطبيق داخل دوال مساعدة قابلة للاختبار بدلا من نشرها داخل حدث واجهة
• افتح أو افحص الملف المحفوظ قبل تسليمه إلى نظام آخر أو إلى العميل

حالات فشل يجب اختبارها

• نجاح SaveAs لا يثبت أن العقد التجاري بقي صحيحا
• قد تختلف الخطوط والأذونات والإعدادات الإقليمية بين الخادم وجهاز التطوير
• يجب ألا تكشف السجلات كلمات مرور أو بيانات عملاء أو روابط داخلية

مثال Delphi تفصيلي

يوضح المثال التالي حدود خدمة عملية لهذا الموضوع، مع إبقاء السياسات والسجلات والتحقق في طبقة يمكن اختبارها

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;

قائمة فحص الإنتاج

• 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