DELPHI ยังสามารถใช้อาร์เรย์ควบคุมได้โดยการกำหนดตัวแปรอาร์เรย์เพื่อใช้อาร์เรย์ควบคุม

Delphi ยังสามารถใช้อาร์เรย์ควบคุมโดยการกำหนดตัวแปรอาร์เรย์เพื่อใช้อาร์เรย์ควบคุม

ความสามารถในการแสดงออกของฉันมีจำกัด และบทความนี้เป็นครั้งแรกที่ฉันเผยแพร่เอกสาร ดังนั้นโปรดขออภัยในความไม่สะดวกด้วย

เมื่อเราใช้ Delphi บางครั้งเราก็พบปัญหา กล่าวคือ Delphi ไม่อนุญาตให้เรากำหนดอาร์เรย์ควบคุม เช่น ซอฟต์แวร์ เช่น VB หรือ VF ได้อย่างง่ายดาย เมื่อฉันเขียนซีดีสาธิตมัลติมีเดีย ฉันต้องใช้ส่วนควบคุมรูปภาพจำนวนมาก และถ้าฉันไม่ใช้ชุดควบคุม การเขียนโปรแกรมจะยุ่งยากและซับซ้อนมาก หลังจากคิดอยู่นาน ในที่สุดฉันก็ตัดสินใจนำอาเรย์ควบคุมไปใช้โดยการกำหนดตัวแปรอาเรย์

นี่คือรหัส:

PROcedure Tfrm_main.FormCreate (ผู้ส่ง: TObject);

var

image:array[1..12] ของ TImage; //ใช้เก็บ 12 เฟรมภาพ

label:array[1..12] ของ TLabel;//ใช้เก็บป้ายกำกับ 12 ป้าย

เริ่ม

//จ่ายออบเจ็กต์รูปภาพให้กับอาร์เรย์รูปภาพ

ภาพ[1]:=ภาพที่1;

ภาพ[2]:=รูปภาพ2;

ภาพ[3]:=รูปภาพ3;

ภาพ[4]:=รูปภาพ4;

ภาพ[5]:=รูปภาพ5;

ภาพ[6]:=ภาพที่6;

ภาพ[7]:=รูปภาพ7;

ภาพ[8]:=ภาพ8;

ภาพ[9]:=รูปภาพ9;

ภาพ[10]:=รูปภาพ10;

ภาพ[11]:=ภาพที่11;

ภาพ[12]:=รูปภาพ12;

//จ่ายวัตถุฉลากให้กับอาเรย์ฉลาก

ป้ายกำกับ[1]:=ป้ายกำกับ1;

ป้ายกำกับ[2]:=ป้ายกำกับ2;

ป้ายกำกับ[3]:=ฉลาก3;

ป้ายกำกับ[4]:=ฉลาก4;

ป้ายกำกับ[5]:=ฉลาก5;

ป้ายกำกับ[6]:=ป้ายกำกับ6;

ป้ายกำกับ[7]:=ฉลาก7;

ป้ายกำกับ[8]:=ฉลาก8;

ป้ายกำกับ[9]:=ฉลาก9;

ฉลาก[10]:=ฉลาก10;

ป้ายกำกับ[11]:=ฉลาก11;

ป้ายกำกับ[12]:=ป้ายกำกับ12;

จบ;