جابجایی دکمه های کیبورد (؟؟؟؟) [بایگانی]

DoctorJay

پنج شنبه 20 دی 1386, 09:49 صبح

فرض کنید که دکمه ی Esc کار نمی کنه و خراب شده

چون این دکمه یه دکمه ی پرکاربرد نمیشه ازش گذشت .

اگه من بخوام جای دکمه ی Esc رو با یه دکمه مثل دکمه ی اعداد

عوض کنم راهش چیه !!

یعنی اینکه وقتی بطور مثال وقتی عدد 0 رو میزنم

کار Esc رو انجام بده .

با تشکر

HjSoft

پنج شنبه 20 دی 1386, 09:56 صبح

دوست عزیز اگه فقط برای بستن پنجره هات می خوای استفاده کنی این کدشه به جای 27 کلید خودتون رو معرفی کنین
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
End
End If
End Sub

DoctorJay

پنج شنبه 20 دی 1386, 10:04 صبح

بستن پنجره هاا !!

نه . کل کاراییه دکمه ی Esc .

یعنی اگه ما مثلا Ctrl+Esc رو که میزدیم, منوی استارت باز میشد .

حالا هم بعد از تغییر, وقتی Ctrl+0 رو میزنیم دقیقا همون کار رو انجام بده .

بخاطره کد بستن پنجره هم ممنون . . .

bobrus

پنج شنبه 20 دی 1386, 10:22 صبح

آقای doctorJay خودت تو این تاپیک شرکت کردی که
http://barnamenevis.org/forum/showthread.php?t=90313
راه حلش همونیه که lsass.crc32 گفته یعنی استفاده از api با نام GetAsyncKeyState بعد برنامتو توی startup بذار هرجای هر دکمه ای زده بشه اول برنامه شما دریافت می کنه بعد می تونی هرکاری باهاش انجام بدی

مبین رنجبر

پنج شنبه 20 دی 1386, 10:47 صبح

کد تغییر کلید ها بصورت زیر هست :

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 1 Then
KeyAscii = 27
End If
End Sub

Private Sub Form_Load()
Me.KeyPreview = True
End Sub

در کد بالا اگر کلید CTRL+A رو بگیری کار Esc انجام میده

bobrus

پنج شنبه 20 دی 1386, 11:16 صبح

آقای lsass.crc32 تودیگه چرا ؟
این دوستمون می خواد هرجایی تو هر برنامه ای که کلید ESC زده شد اینکار انجام بشه
ای بابا حالا کلی ازت طرف داری کرده بودما

مبین رنجبر

پنج شنبه 20 دی 1386, 11:54 صبح

آها .. توی هر برنامه اگر بخواد عوض کنه باید از همون تابعی که گفتم استفاده کنه .. در ضمن این جناب یه تاپیک دیگه ای هم زد در این مورد .. چرا دوباره تاپیک میزنه ؟ ...

DoctorJay

پنج شنبه 20 دی 1386, 20:56 عصر

عزیزان من دچاره اشتباه نشین !! تو هر برنامه عوض شه یعنی چی !!

من میخوام تغییرات برای ویندوز تعریف بشه !! نه توی برنامه ها !!

در ضمن اون کی لاگر بود . من نمی خوام بگم اگه فلان دکمه زده شده فلان دکمرو ارسال کن که !!

میخوام زدن دکمه ی مثلا 0 مستقیما به معنیه زدن دکمه ی Esc باشه .

متوجه منظورم شدین ؟؟

bobrus

شنبه 22 دی 1386, 10:56 صبح

آقای doctor jay عزیز اینکاری که شما میخواین یا باید به اون طریقی که گفته شد عمل کنید یا باید دست بکنین تو درایور کیبرد یعنی یه درایور بنویسید و جایگزین درایور کیبرد کنین و توش تعریف کنید که هر کلید چه کار باید بکند

HjSoft

شنبه 22 دی 1386, 14:44 عصر

منم با نظر اقای bobrus موافقم چون چنین امکانی غیر از دست کاری در ریجستری یا dll ها نیست

HjSoft

شنبه 22 دی 1386, 14:45 عصر

اگر برای برنامه می خوای که تو برنامه انجام بده کد من و lsas درسته

DoctorJay

شنبه 22 دی 1386, 14:50 عصر

گفتم که ! برای برنامه نمی خوام .

می خوام واسه وینذوز تعریف بشه .

یا باید دست بکنین تو درایور کیبرد یعنی یه درایور بنویسید و جایگزین درایور کیبرد کنین و توش تعریف کنید که هر کلید چه کار باید بکند

:قهقهه: فکر کنم همین کارو باید بکنم ............

HjSoft

شنبه 22 دی 1386, 14:55 عصر

خوب خوش حال شدم به جوابی رسیدین

HjSoft

شنبه 22 دی 1386, 14:56 عصر

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

DoctorJay

شنبه 22 دی 1386, 15:02 عصر

شما قانون 11 سایت رو بخون لطفا . . .

عزیز من واسه 4 خط نوشته که 2تا پست پشت سر هم نمی زنن که !!!

اگه مشکل حل شد اونوقت حل شده اعلام میکنم وگرنه هرکس این تاپیک رو دید فکر می کنه

به نتیجه رسیده . از قضا میاد و همون نتیجه ای که ما گرفتیمو میره و عمل میکنه ....

( دست میکنه تو Case و ..... )

sinpin

شنبه 22 دی 1386, 15:09 عصر

فرض کنید که دکمه ی Esc کار نمی کنه و خراب شده
چون این دکمه یه دکمه ی پرکاربرد نمیشه ازش گذشت .
اگه من بخوام جای دکمه ی Esc رو با یه دکمه مثل دکمه ی اعداد
عوض کنم راهش چیه !!
یعنی اینکه وقتی بطور مثال وقتی عدد 0 رو میزنم
کار Esc رو انجام بده .
با تشکر

با کمک این برنامه رایگان میتونید اینکار رو انجام بدید :
http://www.tucows.com/preview/327616

DoctorJay

شنبه 22 دی 1386, 15:19 عصر

جناب Sinpin تشکر بخاطر این برنامه .

ولی حتما میدونید که برنامه نویسا همیشه دنبال سورس هستن .

این مشکلیم که عرض کردم منباب مثال بود . . .

مبین رنجبر

شنبه 22 دی 1386, 16:37 عصر

در ضمن اینجا دانلود سنتر نیست که برنامه معرفی میکنید ...

DoctorJay

شنبه 22 دی 1386, 17:18 عصر

در ضمن اینجا دانلود سنتر نیست که برنامه معرفی میکنید ...

مخالفم . این حرفت درست نبود ...

خوب چه اشکالی داره برنامه ای معرفی بشه !!

شاید با دیدن اون برنامه من ایده ای به ذهنم بخوره ! اینطور نیست آقا مبین !؟ :لبخندساده:

مبین رنجبر

شنبه 22 دی 1386, 18:43 عصر

بله درسته .. در ضمن میبن نه مبین

atlantic_nights

دوشنبه 18 آذر 1387, 09:08 صبح

بابا چقدر به حاشیه Process مکنید
1 سوال داشتم
فکر کردم منظور ایشون هم همون باشه
چطور میشه؟(که....کد اسکی 97 به 98 تبدیل کرد)
یعنی +1به اون اضافه کرد
اگر از این طریق بری

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 1 Then
KeyAscii = 27
End If
End Sub

Private Sub Form_Load()
Me.KeyPreview = True
End Sub

کلی if , Case و ..... میشه
می خواستم +1 بشه چطور باید انجامش بدم
ممنون از همه دوستانی که منو هم راهی و راهنمایی میکنند