เมนูของ Word2000 สามารถลากออกและเชื่อมต่อได้ (DOCK)
ตัวควบคุม Delphi จำนวนมากมีคุณสมบัติ Dock และนี่คือกุญแจสำคัญ
ขั้นแรกให้วาง CoolBar บนแบบฟอร์ม
วาง ToolBar ไว้ด้านบนของ CoolBar และเพิ่มปุ่มสองสามปุ่ม
ตั้งค่าคุณสมบัติ ShowCaption เป็น True;
สร้างเมนูหลักและเพิ่มรายการเมนูบางส่วน
ตั้งค่าคุณสมบัติเมนูของแบบฟอร์มให้ว่างเปล่า
ปุ่ม AutoSize ของ ToolBar ถูกตั้งค่าเป็น True
ตั้งค่า MenuItem ของปุ่มให้เป็นรายการ MainMenu ที่เกี่ยวข้อง
มาดูกันว่าจะน่าสนใจหรือไม่
อย่างไรก็ตาม เมนูไม่สามารถปรากฏขึ้นโดยอัตโนมัติ และไม่สามารถลากออกจากช่วง CoolBar ได้
นี่เป็นเรื่องง่ายที่จะพูด
แล้วการตั้งค่าคุณสมบัติกลุ่มของปุ่มล่ะ มันสามารถป็อปอัปโดยอัตโนมัติได้หรือไม่?
ตั้งค่าแอตทริบิวต์การลากและแอตทริบิวต์ท่าเรือของ ToolBar (คุณไม่ทราบว่าแอตทริบิวต์ใดคือแอตทริบิวต์ทั้งสองนี้:-( )
ลองเปรียบเทียบกับเมนูของ Word200 กัน