Solved

Hook keyboard and barcode scanner problem

Posted on 2003-11-21
4
557 Views
Last Modified: 2013-11-18
I use a hook keyboard dll with delphi application, this dll send key used for user to delphi application only but when I use the barcode scanner the characters send to application result of: DOMAYUSCULA OR ENTER O so on... not complete string result of laser read, the barcode scanner read from paper DO821431051 but application get DOMAYUSCULA or ENTER O so on...

How to read real string from barcode scanner with use hook keyboard dll?

The final procedure fro get Keys is:

  {Virtual key code to Key Name}
  GetKeyNameText(Message.LParam,@NombreTecla,100);

  {Look if the key was pressed, released o re-pressed}
  if ((Message.lParam shr 31) and 1)=1 then
    edIngreso.Text:= edIngreso.Text + String(NombreTecla)
//  Accion:='Soltada' {Released}
  else
  if ((Message.lParam shr 30) and 1)=1
      then Accion:='Repetida' {repressed}
      else Accion:='Pulsada'; {pressed}
0
Comment
Question by:ripper
4 Comments
 
LVL 11

Accepted Solution

by:
robert_marquardt earned 500 total points
ID: 9798997
GetKeyNameText returns a localized textual description of the key like " ENTER" for the enter key.
0
 

Author Comment

by:ripper
ID: 9800128
That correct!

But, in the second reading get  is DOMAYUSCULAS821431051ENTRAR and nothing get with OnKeyPress ord(Key)= 13 (Enter Key)

I need a way for send enter key and cleaning ingress.

I use Delete procedure for both MAYUSCULAS AND ENTRAR but not tigger Enter Key!

Thanck...
0

Featured Post

PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

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…
Viewers will get an overview of the benefits and risks of using Bitcoin to accept payments. What Bitcoin is: Legality: Risks: Benefits: Which businesses are best suited?: Other things you should know: How to get started:
You have products, that come in variants and want to set different prices for them? Watch this micro tutorial that describes how to configure prices for Magento super attributes. Assigning simple products to configurable: We assigned simple products…

778 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