PDA

View Full Version : کلید num lock



aleas2
سه شنبه 17 آبان 1390, 15:22 عصر
سلام خسته نباشید رو صفحه کلید که کلید هسته بنام num lock که یه چراغ هم بالاش هسته بنام num خب این کلیک مال اینه وقتی روی num lock کلیک میکنی چراغ num روشن میشه و میتونی از کلید های ماشین حساب سمت راست صفحه کلید استفاده کنی ولی اگر دوباره رو num lock کلید کنی چراغ خاموش میشه و کلید های ماشین حساب سمت راست صفحه کلید غیرفعال میشن کار نمیکنن
حالا میخواستم بدونم چطور تو vb6 میتونم اینکارو کنم دوتا سوال دارم دوتا command داریم وقتی روی command1 چک کنه اگر قبلا روی num lock کلیک شده چراغ هم روشنه یعنی کلید های ماشین حساب فعال هستن غیر فعال بشه

و اگر روی command2 کلیک کرد برعکس command1

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

MohammadGh2011
سه شنبه 17 آبان 1390, 16:06 عصر
سلام عليکم
کد زير و تاپيک هاي زير را بررسي کنيد:
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function SetWindowRgn Lib "user32" (ByVal hwnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const VK_NUMLOCK = &H90
Private Const VK_CAPITAL = &H14
Private Const VK_SCROLL = &H91
Private Const KEYEVENTF_KEYUP = &H2
Private Const KEYEVENTF_KEYDOWN = &H0

Private Sub Command1_Click()
Dim rgn As Long
keybd_event VK_NUMLOCK, 0, KEYEVENTF_KEYDOWN, 0
keybd_event VK_CAPITAL, 0, KEYEVENTF_KEYUP, 0
keybd_event VK_SCROLL, 0, KEYEVENTF_KEYDOWN, 0
End Sub

تشخیص روشن یا خاموش بودن Num Lock و Caps Lock (http://barnamenevis.org/showthread.php?211552-%D8%AA%D8%B4%D8%AE%DB%8C%D8%B5-%D8%B1%D9%88%D8%B4%D9%86-%DB%8C%D8%A7-%D8%AE%D8%A7%D9%85%D9%88%D8%B4-%D8%A8%D9%88%D8%AF%D9%86-Num-Lock-%D9%88-Caps-Lock&highlight=num+lock)
روشن و خاموش کردن دکمه Num Lock (http://barnamenevis.org/showthread.php?248821-%D8%B1%D9%88%D8%B4%D9%86-%D9%88-%D8%AE%D8%A7%D9%85%D9%88%D8%B4-%DA%A9%D8%B1%D8%AF%D9%86-%D8%AF%DA%A9%D9%85%D9%87-Num-Lock&highlight=num+lock)
روشن و خاموش شدن Caps Lock , Num Lock , Scroll Lock (http://barnamenevis.org/showthread.php?190720-%D8%B1%D9%88%D8%B4%D9%86-%D9%88-%D8%AE%D8%A7%D9%85%D9%88%D8%B4-%D8%B4%D8%AF%D9%86-Caps-Lock-Num-Lock-Scroll-Lock&highlight=num+lock)

و num lock رو هم اشتباه تايپ کرديد.

موفق باشيد

joker_pok
سه شنبه 17 آبان 1390, 16:58 عصر
شما یه status bar بزار رو فرمت تو این نوار وضعیت توی قسمت Costumize می تونی umlok رو بهش تعریف کنی تا روشن خاموش رو بهت نشون بده . یا هم که از طریق کد نویسی که دوستان در بالا ذکر کردند استفاده کنی