Improve company productivity with a Business Account.Sign Up

x
?
Solved

accessing numpad without pressing numlock

Posted on 2006-06-28
5
Medium Priority
?
298 Views
Last Modified: 2010-04-05
I can use the numbkeys.
with the virtual handle vk_numpad_0-9
but only if NumLook is pressed..
and the 2 4 6 and 8 is possible to press without pressed numlock key..
but i need the other keys too (1,3,7,9) from the numpad.

0
Comment
Question by:Applicationmaker
5 Comments
 

Expert Comment

by:AshusCZ
ID: 17001344
What about ensuring that the num-lock is switched on? And if it wasn't, turning it off again.
Should I post a code for this?
0
 

Author Comment

by:Applicationmaker
ID: 17001404
yes AshusCZ, would be nice if you can post code for this :-)
0
 
LVL 10

Assisted Solution

by:atul_parmar
atul_parmar earned 300 total points
ID: 17001520
0
 

Accepted Solution

by:
AshusCZ earned 390 total points
ID: 17001538
var switchedOff: boolean;
   procedure Switch;
   begin
   if switchedOff then
      begin
      keybd_event(VK_NUMLOCK, 0, 0, 0);
      keybd_event(VK_NUMLOCK, 0, 2, 0);
      end;
   end;
begin
switchedOff := (GetKeyState(VK_NUMLOCK) <> 1);
Switch;


/// any code
keybd_event(VK_NUMPAD7, 0, 1, 0);
/// any code


Switch;
end;
0
 
LVL 17

Assisted Solution

by:TheRealLoki
TheRealLoki earned 60 total points
ID: 17005620
you can use the vk_ keys for all the function of the numpad, eg.

vk_NumPad0   = $60;
vk_NumPad1   = $61;
vk_NumPad2   = $62;
vk_NumPad3   = $63;
vk_NumPad4   = $64;
vk_NumPad5   = $65;
vk_NumPad6   = $66;
vk_NumPad7   = $67;
vk_NumPad8   = $68;
vk_NumPad9   = $69;

vk_Insert    = $2D;
vk_Delete    = $2E;
vk_Prior     = $21; //3
vk_Next      = $22; //9
vk_End       = $23; //1
vk_Home      = $24; //7
vk_Left      = $25;
vk_Up        = $26;
vk_Right     = $27;
vk_Down      = $28;
vk_NumLock= $90;
0

Featured Post

Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
Watch the video to know how one can repair corrupt Exchange OST file effortlessly and convert OST emails to MS Outlook PST file format by using Kernel for OST to PST converter tool. It can convert OST to MSG, MBOX, EML to access them. It can migrate…
In the video, one can understand the process of resizing images in single or bulk. Kernel Bulk Image Resizer is an easy to use tool for resizing large number of images. One can add and resize multiple images with this tool in single go. The video sh…

595 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question