ThaiPBL.com

PowerBuilder Library Thailand

อีเมล พิมพ์ PDF

การทำงานร่วมกับตัว MS Windows

สวัสดีครับ ในคีย์บอร์ดรุ่นใหม่ๆนี้เราจะพบว่ามีปุ่มเพิ่มมาหลายปุ่มด้วยกันโดยมีการทำงานร่วมกับตัว MS Windows เช่นเรียกเมนูขึ้นมา หรือ เรียก start เป็นต้น ดังนั้นเราจึงจะทำการนำเอาประโยชน์ของปุ่ม เมนูมาใช้ในงานของเรา โดยเมื่อใดก็ตามที่เรากดปุ่มนี้โปรแกรมจะทำการ popup เมนู ขึ้นมาให้เราเลือกใช้งานทันทีณจุดที่ mouse อยู่

เรามาดูขั้นตอนการทำงานกันเลย

สคริปต์ทั้งหมดนี้ให้วางใว้ที่ key event ของตัว วินโดวส์ คอนโทรลที่เราต้องการเลย

Constant Integer VK_APP = 93

m_popup lmnu_popup

If Message.WordParm = VK_APP Then

lmnu_popup = Create m_popup

lmnu_Popup.PopMenu( PointerX(), PointerY() )

End If

โดย m_popup ก็คือชื่อของ เมนูที่คุณต้องการให้มันทำงานในแบบ popup


บทความนี้มาจาก www.soopawat.com