مكوّن TXLSWorkbookViewer

TXLSWorkbookViewer عنصر تحكّم من نوع VCL يعرض أوراق العمل من أيٍّ من محرّكَي المصنف دون Microsoft Excel أو أتمتة COM

مصادر المصنف

• أسند Workbook لعرض TXLSWorkbook موجود
• أسند XlsxWorkbook لعرض TXLSXWorkbook موجود
• استدعِ LoadFromFile ليتملّك العارض مصنف XLS أو XLSX أو XLSM أو XLTX أو XLTM أو ODS ويحمّله
• استدعِ ClearWorkbook قبل تحرير مصنف مملوك خارجيًّا ما زال مرتبطًا

التنقل

يوفر عنصر التحكّم أشرطة تمرير أفقية ورأسية وتمريرًا بعجلة الفأرة وسحبًا بالفأرة وامتداد نطاق بـ Shift وتنقلًا بأسهم الاتجاهات وHome وPage Up وPage Down وTab

تحدد GoToCell صفًّا وعمودًا، وتحدد SelectRange مستطيلًا، ويبدّل NextWorksheet وPreviousWorksheet بين الأوراق، ويكشف SelectedRange مرجع A1 المطبع

التحرير والحساب

اضبط Editable على True للسماح بالتحرير عبر F2 والنقر المزدوج ومفاتيح الأحرف القابلة للطباعة وDelete وشريط الصيغ؛ تبقى الخلايا المقفلة في ورقة محمية للقراءة فقط

يتحكم BeginEdit وCommitEdit وCancelEdit في المحرر الموضعي، بينما يدعم EditSelectedCell وFormulaBarText شريط صيغ خارجيًّا

تتعرف التعديلات المثبَّتة على الصيغ والقيم المنطقية والأعداد الصحيحة وقيم الفاصلة العائمة والنص والإدخال الفارغ، ثم تعيد حساب الصيغ التابعة وتُبطل ذاكرتَي التنسيق الشرطي وترقيم الصفحات المؤقتتين

يستخدم Undo وRedo سجلًّا دائريًّا محدود الأداء بتكلفة O(1)؛ اضبط UndoLimit للتحكم في السعة أو على صفر لتعطيل السجل

يمسح Delete أو ClearSelectedRange التحديد كمعاملة واحدة؛ ينسخ Ctrl+C وCopySelectedRange نصًّا Unicode مفصولاً بمحارف جدولة، بينما يلصق Ctrl+V وPasteSelectedRange وPasteText كتلة نص مستطيلة عند الزاوية العلوية اليسرى للتحديد كإدخال تراجع واحد

يفحص فحص الحماية والبنية المسبق النطاق المحجوب بالكامل ويرفضه قبل أي تعديل؛ يحافظ التراجع وإعادة التنفيذ على النص الغني الأصلي وذاكرات الصيغ والأنماط والخلايا الغائبة في النموذجين، مع فحص الحماية نفسه عند كل محاولة في السجل

تُرفض الصيغ المصفوفية القائمة ومناطق جداول البيانات ولصقات الخلايا المتعددة المتقاطعة مع دمج؛ تحافظ تعديلات مرساة الدمج الأحادية ومسح الدمج الكامل على هندسة الدمج، بينما يُرفض المسح الجزئي لنطاق مدمج

يمكن أيضًا إنشاء محرك TXLSWorkbookEditHistory المشترك دون عنصر تحكم؛ راجع معاملات التحرير الـ headless لمعرفة قواعد الإحداثيات وعمر الكائن والحساب وحدود العمليات

اختيار مراجع الصيغ

استدعِ BeginReferencePick بينما يجمع محرر الصيغ في التطبيق المضيف مرجعًا من ورقة العمل؛ يرفع كل تغيير في التحديد الحدث OnReferencePick مع نطاق A1 الحالي حتى استدعاء EndReferencePick

العرض

يستخدم العارض عروض الأعمدة وارتفاعات الصفوف ونص العرض المنسَّق لكل ورقة عمل، ويعرض تعبئات XLS الكلاسيكية الصلبة وتنسيق الخطوط، ويوفر رؤوسًا وخطوط شبكة وألوان تحديد قابلة للضبط

بالنسبة لأوراق XLSX، يعرض العارض أيضًا التعبئات الشرطية وألوان الخطوط وتوكيداتها وتنسيقات الأرقام ومقاييس الألوان وأشرطة البيانات الاتجاهية الموجبة والسالبة والتدرجات والحدود والمحاور والقيم المخفية وجميع عائلات مجموعات الأيقونات المدمجة

يخزّن العارض مؤقتًا مقيِّم تنسيق شرطي واحدًا معدًّا للورقة النشطة، فلا تعيد عمليات التمرير وإعادة رسم التحديد مسح المصنف؛ استدعِ RefreshConditionalFormats بعد تغيير القيم أو الصيغ أو النطاقات أو القواعد الشرطية في مصنف مرتبط

يفحص عرض XLSX الخلايا المتناثرة وطبقات الأنماط الفاصلة دون فهرسة إحداثيات فارغة، فلا تُنشئ عملية التمرير خلايا فارغة مرئية ولا توسّع تخزين ورقة العمل

معاينة الطباعة

اضبط PrintPreview على True لعرض ورقة العمل النشطة عبر نموذج TXLSPaginationModel المشترك الذي تعتمده هندسة صفحات PDF وعدّها

‏PreviewPage قائم على 1 ومحصور في PreviewPageCount؛ تنقل أوامر الأسهم وPage Up وPage Down وHome وEnd وعجلة الفأرة والتمرير الرأسي بين الصفحات المنطقية أثناء نشاط المعاينة

يكشف PaginationModel النموذج المخزَّن، ويكتب SavePreviewPageAsMetafile الصفحة المنطقية المحددة كملف EMF، ويعيد RefreshPagination بناء المخزن بعد تغييرات القيم أو الأبعاد أو إعدادات الطباعة أو الفواصل أو العناوين أو الرسومات

الأحداث

• OnSelectionChange يفيد بالصف والعمود المحدَّدَين حديثًا
• OnWorksheetChange يُطلق بعد تغيّر ورقة العمل النشطة
• OnBeforeEdit يمكنه تعديل الإدخال المقترح أو رفض التحرير
• OnAfterEdit يفيد بتحرير خلية مثبَّت
• OnReferencePick ينشر نطاق A1 المحدد في وضع التقاط المراجع

مثال Delphi

Viewer := TXLSWorkbookViewer.Create(Self);
Viewer.Parent := Self;
Viewer.Align := alClient;
Viewer.XlsxWorkbook := Workbook;
Viewer.Editable := True;
Viewer.SelectRange(2, 1, 5, 3);
Caption := Viewer.SelectedRange;
Viewer.GoToCell(2, 3);
Viewer.FormulaBarText := '=A1*2';
Viewer.Undo;
Viewer.Redo;
Viewer.RefreshConditionalFormats;
Viewer.PrintPreview := True;
Viewer.PreviewPage := 1;
Viewer.SavePreviewPageAsMetafile('Preview.emf');
Viewer.GoToCell(12, 4);
Caption := Viewer.WorksheetName + ': ' + Viewer.SelectedCellText;

انظر Demo\Delphi\WorkbookViewer للاطلاع على عارض كامل يُنشأ وقت التشغيل مع فتح الملفات وعناصر التحكّم بأوراق العمل