PDA

View Full Version : رخدادی برای کنترل خروج فوکوس از برنامه



VB6.0
شنبه 08 آذر 1382, 08:25 صبح
با سلام
آیا رخداد(ایونت)ی برای کنترل مواقعی که کاربر فوکوس رو از برنامه گرفته و به یک برنامه دیگه میده وجود داره؟
مثلا وقتیکه داره با برنامه ما کار میکنه ولش کنه و مثلا برای یه کاری نوت پد رو باز کنه و کنترل رو به اون بده!
در واقع برنامه فعال رو تغییر میده و ...(نمیدونم که متوجه میشید یا نه؟)
متشکرم.

ایران ویج
شنبه 08 آذر 1382, 14:01 عصر
با سلام
آیا رخداد(ایونت)ی برای کنترل مواقعی که کاربر فوکوس رو از برنامه گرفته و به یک برنامه دیگه میده وجود داره؟
مثلا وقتیکه داره با برنامه ما کار میکنه ولش کنه و مثلا برای یه کاری نوت پد رو باز کنه و کنترل رو به اون بده!
در واقع برنامه فعال رو تغییر میده و ...(نمیدونم که متوجه میشید یا نه؟)
متشکرم.
درود :
ببین برای این کار یه تایمر میخوایی و استفاده از تابع GetForegroundWindow.
برای تست یه فرم جدید باز کن و توش یه تایمر بزار که مثلا هر یکدهم ثانیه یه بار فعال شه حالا این کد رو توی ماجول فرمت بزار و اجرا کن بعد سویچ کن روی یه برنامه دیگه . یه پیام سلام بهت میده . پایان


Private Declare Function GetForegroundWindow Lib "user32.dll" () As Long
Private Sub Timer1_Timer()
If Form1.hWnd <> GetForegroundWindow() Then MsgBox "hi"
End Sub

VB6.0
یک شنبه 09 آذر 1382, 11:23 صبح
با سلام
جناب ایران ویج دستتون خیلی درد نکنه, چون خیلی بدردم خورد!
باز هم میگم:
من هیچ جای دنیا رو با این فروم عوض نمیکنم!
متشکرم.

mohsengrisly
پنج شنبه 12 آذر 1383, 10:32 صبح
ببین برای این کار یه تایمر میخوایی و استفاده از تابع GetForegroundWindow.
برای تست یه فرم جدید باز کن و توش یه تایمر بزار که مثلا هر یکدهم ثانیه یه بار فعال شه حالا این کد رو توی ماجول فرمت بزار و اجرا کن بعد سویچ کن روی یه برنامه دیگه . یه پیام سلام بهت میده . پایان