يقدم IBM® Lotus® Symphony™ Spreadsheets واجهة تعامل
Universal Network Objects (UNO) لادارة عمليات الاحتساب الآلي.
يمكنك استخدام واجهة التعامل لاتاحة أو الغاء اتاحة وظيفة الاحتساب الآلي.
واجهة تعامل UNO لادارة عمليات الاحتساب الآلي هي
XCalculatable.
- يمكنك استخدام XCalculatable::enableAutomaticCalculation(boolean
bEnabled) لتحديد الحالة الخاصة بعملية الاحتساب الآلي. حدد المعامل
bEnabled بالقيمة True لاتاحة عمليات الاحتساب الآلي، أو القيمة
False لالغاء اتاحة عمليات الاحتساب الآلي.
- يمكنك استخدام XCalculatable::isAutomaticCalculationEnabled() للحصول على الحالة الحالية لعملية الاحتساب الآلي. اذا كانت عملية الاحتساب الآلي متاحة حاليا، تكون القيمة المرتجعة هي True.
خلاف ذلك، تكون القيمة المرتجعة هي False.
يعد الكود التالي مثال. اذا كانت عملية الاحتساب الآلي متاحة حاليا، بتشغيل الأمر المركب سيتم
الغاء اتاحة عملية الاحتساب الآلي.
خلاف ذلك، بتشغيل الأمر المركب سيتم اتاحة عملية الاحتساب الآلي.
Sub Main
Dim oDoc as Object
Dim enabled as Boolean
Set oDoc = StarDesktop.CurrentComponent
enabled = Not oDoc.isAutomaticCalculationEnabled
oDoc.enableAutomaticCalculation(enabled)
End Sub