پاپ آپ با چپ کلیک

[peiman]

سلام
این برنامه که اتچ کردم رو ببینید
همه میشناسنش ایزی پی اچ پیه
روی کلید e که کلیک کنید یه پاپ اپ باز میشه
میخواستم ببینم چطور میشه این کارو کرد
احتمالا اسونه ولی سه روزه پدرمو در اورده

 

[redjoker]

كجا اتچ كردي چرا من نميبينم :f34r:

 

[Arash_j13]

یه باتون و یه پاپ پاپ منو روی فرم بزار و کد زیر رو توی رویداد onmousedown بنویس

 if  Button = mbLeft then
   PopupMenu1.Popup(left+Button1.Left+4,
                    top+Button1.top+Button1.Height-ClientHeight+Height-5);

 

[peiman]

اها یعنی قرار بود بفرستم ولی یادم رفت
ممنون آرش جان
اینم اتچ

 

[peiman]

ممنون
تست کردم کار میکنه اما یه مشکل دیگه دارم
همشو تو این پروژه که اتچ کردم گذاشتم
میشه راهنماییم کنی؟

 

[Arash_j13]

تنها راهی که فلا به نظر می رسه اینکه از رویداد OnMouseUp استفاده کنید