ซอร์สโค้ดดาวน์โหลดที่อยู่: http://www.csdn.net/cnshare/soft/openfile.asp?kind=1&id=21608
หากคุณไม่สามารถดาวน์โหลดได้โปรดตรวจสอบ: http://blog.csdn.net/luckyjan/archive/2003/06/25/13071.aspx
ซอร์สโค้ดสำหรับกล่องโต้ตอบรอสำหรับการเขียนโปรแกรม Delphi
ส่วนใหญ่จะใช้ในการแสดงกล่องโต้ตอบรอระหว่างการทำงานของโปรแกรมซึ่งมี AVI (tanimate) ข้อความแจ้งสองข้อความ (เช่น tlabel) และแถบความคืบหน้า (tgauge);
วิธีหลัก:
FormShow: แสดงกล่องโต้ตอบรอ
Formhide: ปิดกล่องโต้ตอบรอ
ProgressStepit: รอตำแหน่งแถบความคืบหน้าในกล่องโต้ตอบเพื่อเพิ่มขั้นตอน
คุณลักษณะหลัก:
ชื่อ: รอชื่อกล่องโต้ตอบ
คำบรรยายภาพ: รอคำบรรยายชื่อเรื่องโต้ตอบ
Message1: รอข้อความแจ้งของกล่องโต้ตอบ 1
Message2: รอข้อความแจ้งของกล่องโต้ตอบ 2
WordWrap: Message1 และ Message2 จะปรากฏขึ้นในแถวมันจะถูกแปลงโดยอัตโนมัติหรือไม่?
Message1Font, Message2Font: Message1, Message2 Fonts
Aviacitive: รอว่าการกระทำของ AVI นั้นถูกดำเนินการในกล่องโต้ตอบหรือไม่
ProgressMax: ค่าสูงสุดของแถบความคืบหน้า
ProgressMin: มูลค่าขั้นต่ำของแถบความคืบหน้า
ProgressPos: ตำแหน่งปัจจุบันของแถบความคืบหน้า
ProgressStep: แถบความคืบหน้าในวิธีการ ProgressStepit เพิ่มจำนวนขั้นตอน
DialogStyle (= DLGNORMAL, DLGSTAYONTOP): มันอยู่ข้างหน้าเสมอเมื่อรอกล่องโต้ตอบที่จะแสดง
Aviposition (= Avibottom, Avitop, Avileft): ที่ตั้งของ avi
[ตัวเลือก]:
ShowMessage1: จะแสดงข้อความพรอมต์ 1
ShowMessage2: ไม่ว่าจะแสดงข้อความพรอมต์ 2
showavi: จะแสดง avi
Showcaption: ไม่ว่าจะแสดงคำบรรยายตอบแบบรอการรอคอย
Showprogress: จะแสดงแถบความคืบหน้าหรือไม่
ShowProgressText: เปอร์เซ็นต์ความคืบหน้าจะแสดงบนแถบความคืบหน้าหรือไม่