คุณสมบัติที่สำคัญและวิธีการของ Delphi ในการควบคุม Excel

คุณสมบัติที่สำคัญและวิธีการของ Delphi ในการควบคุม Excel

มีสี่วิธีในการเรียก Excel ใน Delphi

ก่อนอื่นเราให้ขั้นตอนรหัสหลักที่สร้างผ่าน OLE สำหรับคำอธิบายสั้น ๆ :

สร้างวัตถุ OLE:

var olecon: tolecontainer;

Olecon: = tolecontainer.create (ตัวเอง);

Olecon.oleObject: = olecon.createObject ('excel.sheet', false);

หรือเลือกที่จะนำเข้าไฟล์ excel เพื่อสร้างวัตถุ OLE:

OLECON.OLEOBJECT: = OLECON.CreateObjectFromFile (XLSNAME, FALSE);

เป็นการดีที่สุดที่จะซ่อนแถบเครื่องมือหลายอย่างของ Excel เพื่อให้เป็นเพียงตารางที่ฝังอยู่ในโปรแกรมของคุณ:

Olecon.oleobject.application.CommandBars ['Standard']. มองเห็นได้: = false;

Olecon.oleobject.application.CommandBars ['การจัดรูปแบบ']. มองเห็นได้: = false;

Olecon.oleobject.application.CommandBars ['ตรวจสอบ']. มองเห็นได้: = false;

จากนั้นแสดงและเปิดใช้งานตาราง Excel ไปยังวัตถุที่กำหนดโดย ToleContainer:

Olecon.Show;

Olecon.doverb (0);

โดยทั่วไปแล้วจะโอเค แต่มีสิ่งที่ไม่ดีเกี่ยวกับ tolecontainer ซึ่งเมื่อคุณคลิกที่การควบคุมอื่น ๆ มันจะสูญเสียโฟกัสแล้วออกโดยอัตโนมัติ คีย์คือเมื่อมันสูญเสียโฟกัสวัตถุ Excel จะหายไป อธิบายอย่างละเอียด

ต่อไปเราจะเริ่มพูดคุยเกี่ยวกับคุณสมบัติทั่วไปและวิธีการของอินเทอร์เฟซใน excel_tlb ส่วนใหญ่สำหรับการส่งออกและตั้งค่ารูปแบบรายงาน

อ่านและเขียนคุณสมบัติของเซลล์:

Olecon.oleobject.application.cells.item [1,1];

Olecon.oleobject.application.cells (1,1);

Olecon.oleobject.application.cells [1,1] .Value;

ทั้งสามด้านบนสามารถอ่านและเขียนหน่วย 'A1' ของแผ่นงาน

ใน Delphi การดำเนินการบนเซลล์ (ชุด) พื้นที่แผ่นงาน ฯลฯ จะถูกนำไปใช้โดยตัวแปร

กำหนดพื้นที่ที่เลือกในโปรแกรมของคุณเองให้อยู่ในช่วง:

ช่วง var, แผ่น: ตัวแปร;

ช่วง: = olecon.oleobject.application.Range ['A1: C3'];

หรือ:

Sheet: = Olecon.oleobject.application.activeSheet;

ช่วง: = olecon.oleobject.application.Range [sheet.cells [1,1], sheet.cells [3,3]];

ผสานเซลล์สำหรับช่วงข้างต้น:

Range.merge;

ช่วง 1C 1: = 'ผสานพื้นที่';

โปรดทราบว่าในอนาคตข้อความในเซลล์ที่ผสานเป็นข้อความที่มุมซ้ายบนของพื้นที่ที่ผสาน

กำหนดพื้นที่ที่เลือกในตาราง Excel ถึงช่วง:

ช่วง: = excel_grid1.oleobject.application.Selection;

แยกเซลล์:

range.unmerge;

หลังจากผสานให้ตั้งค่ารูปแบบของเซลล์ (ชุด):

range.horizontalalignment: = xlcenter; // วิธีการตั้งศูนย์กลางแนวนอนของข้อความ

range.verticalalignment: = xlcenter // ข้อความวิธีการตั้งศูนย์กลางแนวตั้ง

range.wraptext: = true; // ข้อความห่อโดยอัตโนมัติ

range.borders.linestyle: = 1 // เพิ่มพรมแดน

range.interior.ColorIndex: = 39; // การเติมสีคือ Lilac

range.font.name:='lishu';//font

range.font.color: = clblue; // สีตัวอักษร

เหล่านี้เป็นรูปแบบทั่วไปและข้างต้นยังใช้กับเซลล์เดียว

มองหาเซลล์ในตาราง Excel:

var u1, u2, u3, u4, u5: ตัวแปร;

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 [' 4 ' ] .pastespecial;

สิ่งเหล่านี้เป็นสิ่งที่ใช้กันทั่วไปซึ่งใช้กับตัวควบคุม Exel ภายใต้แผงเซิร์ฟเวอร์ใน Delphi และวิธีการสร้างวัตถุ Excel.Application COM

ผู้แต่ง: Feiya

เวลา: 2004-9-14