خصائص وطرق دلفي المهمة للتحكم في Excel

خصائص وطرق دلفي المهمة للتحكم في Excel

هناك أربع طرق للاتصال بـ Excel في Delphi.

أولاً ، نقدم بعض خطوات التعليمات البرمجية الرئيسية التي تم إنشاؤها من خلال OLE للحصول على وصف موجز:

إنشاء كائن OLE:

Var Olecon: Tolecontainer ؛

Olecon: = tolecontainer.create (self) ؛

Olecon.OleObject: = Olecon.CreateBject ('excel.sheet' ، false) ؛

أو اختر استيراد ملف Excel لإنشاء كائن OLE:

Olecon.OleObject: = Olecon.CreateBjectFromFile (xlsname ، false) ؛

من الأفضل إخفاء العديد من أشرطة أدوات Excel ، بحيث يكون مجرد جدول مضمن في برنامجك:

olecon.oleobject.application.CommandBars ['Standard']. مرئي: = false ؛

olecon.oleobject.application.CommandBars ['تنسيق']. مرئي: = false ؛

olecon.oleobject.application.CommandBars ['Reviewing']. مرئي: = false ؛

ثم عرض وتنشيط جدول Excel إلى الكائن المحدد بواسطة Tolecontainer:

Olecon.Show ؛

Olecon.Doverb (0) ؛

هذا أمر جيد ، ولكن هناك شيء سيء حول Tolecontainer ، وهو أنه عند النقر على عناصر تحكم أخرى ، فإنه يفقد التركيز ثم يخرج تلقائيًا المفتاح هو عندما يختفي ، كائن Excel ، يمكنك استخدام عنصر التحكم في منطقة Excel حيث يوجد Tolecontainer لخداع المستخدمين. اشرح ذلك بالتفصيل.

بعد ذلك ، سنبدأ في الحديث عن الخصائص والأساليب الشائعة للواجهات في Excel_TLB ، وذلك أساسًا لتصدير تنسيقات التقارير وإعدادها.

اقرأ وكتابة خصائص الخلية:

olecon.oleobject.application.cells.item [1،1] ؛

olecon.oleobject.application.cells (1،1) ؛

olecon.oleobject.application.cells [1،1] .value ؛

يمكن الثلاثة أعلاه قراءة وكتابة وحدة "A1" في ورقة العمل.

في دلفي ، يتم تنفيذ العمليات على الخلايا (المجموعات) ، المناطق ، أوراق العمل ، إلخ.

قم بتعيين المنطقة المحددة في برنامجك الخاص إلى النطاق:

var range ، ورقة: البديل ؛

المدى: = olecon.oleObject.application.range ['a1: c3'] ؛

أو:

ورقة: = olecon.oleObject.application.activeshet ؛

المدى: = olecon.oleObject.application.range [sheet.cells [1،1] ، sheet.cells [3،3]] ؛

دمج الخلايا للنطاق أعلاه:

Range.merge ؛

المدى 1C 1: = "منطقة الدمج" ؛

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

قم بتعيين المنطقة المحددة في جدول Excel للنطاق:

المدى: = excel_grid1.OleObject.Application.Seyse ؛

الخلايا المنقسمة:

Range.unmerge ؛

بعد الاندماج ، اضبط تنسيق الخلايا (مجموعات):

Range.HorizontalAlignment: = xlcenter

المدى.

Range.WrapText: = true ؛ // يلف النص تلقائيًا

Range.Borders.linestyle: = 1 // إضافة الحدود

Range.Interior.ColorIndex: = 39 ؛ // ملء لون أرجواني

Range.font.name:='lishu' ؛ //font

Range.font.color: = clblue ؛ // font color

هذه هي التنسيقات الشائعة ، وما سبق ينطبق أيضًا على خلية واحدة.

ابحث عن الخلايا في جدول Excel:

var u1 ، u2 ، u3 ، u4 ، u5: variant ؛

u1: = olecon.oleobject.application.activecell ؛ // الحصول على الخلية الحالية ؛

u2: = u1.previous ؛ // في الحالات غير المميزة ، إنها الشبكة الواحدة على يسار U1 ؛

u3: = ui.next ؛ // في الحالات غير المميزة ، فهي الشبكة على الجانب الأيمن من u2 ؛

u4: = olecon.oleobject.application.cells [u1.cells.row-1 ، u1.cells.column] ؛ // لا توجد حالة خاصة هي الشبكة أعلاه

u5: = olecon.oleobject.application.cells [u1.cells.row+1 ، u1.cells.column] ؛ // لا توجد حالة خاصة هي الشبكة التالية

حذف وإدخال صف وعمود:

olecon.oleobject.application.rows [2] .Delete ؛

Olecon.OleObject.Application.Columns [2] .Delete ؛

olecon.oleobject.application.rows [2] .insert ؛

olecon.oleobject.application.columns [2] .insert ؛

انسخ المنطقة المحددة:

olecon.oleobject.application.range ['a1: c 3 '' ].ينسخ؛

ابدأ في الصياف من الخلية المحددة:

olecon.oleobject.application.range ['a 4 ' ] .pastespecial ؛

هذه هي العناصر الشائعة ، والتي تنطبق على عناصر التحكم Exel تحت لوحة الخادم في Delphi وطريقة إنشاء كائنات Com Excel.Application.

المؤلف: فايا

وقت: 2004-9-14