Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come
out every day, so no prevention program can catch 100% of them. For your own safety, please:
Re-scan downloaded files using your personal virus checker before using it.
NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
If you don't have a virus scanner, you can get one at many places on the net
including:McAfee.com
Terms of Agreement:
By using this code, you agree to the following terms...
You may use
this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
You may link to this code from another website, but ONLY if it is not wrapped in a frame.
You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.
very good i always used to use the keyboard event function :) (If this comment was disrespectful, please report it.)
3/14/2005 9:30:03 PM:
I'm newer about delphi, I have put a button on the form1, and a input editbox name edit1,now,who can tell me ,how can use this unit to send string "abc" to the edit1?
procedure TForm1.Button1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin edit1.SetFocus ; Pressascii(65,10); PressAscii(66,10); PressAscii(67,10); end; (If this comment was disrespectful, please report it.)
The best code ever!!!! I have use it for my graphic virtual keyboard. I have it configured into slovenian language.
I have not solved one just one problem. I cant call the following signs: "[ ] { } @" can any one help me with these? ps: this "@" sign has following keys "ALT GR + V" (For slovenian keyboard)
Keep on good working:)
Gasper Juhart (If this comment was disrespectful, please report it.)
i got a problem: when i`m add this to my project and try to compile i recive error: MMDebug.dcu not found, What is this? where i can find this file? im using Delphi7 (If this comment was disrespectful, please report it.)
Hi...! I have two different programs, from first exe i am passing the sendmessege to another then second exe will open the IE and after opening that IE Window, I am trying to fire keystroke on it, but sometimes it missed, i mean when i am going to pass the keystroke "ABCDEF" 10 time it will work fine, but when I am going to run that command more then 100 time it will skip some character, i mean it will fire keystroke like "ABCEF", not any fixed key stroke, it skips randomly. and one another thing when i am opening the same internet explorer windows from the first exe it will fire the entire keystroke perfectly. this happens only when i am trying to open that Internet explorer with second exe and it happens only with internext explorer window.
I am always be online on my following Ids. for all working days.
@Sanket You've probably already resolved it by now. I apologize it took me so long to see this posting here. This account was linked to an email I hardly use.
- Your output may be too fast for your computer or IE, trying slowing down the output between automated keys.
- Make sure you are programming to wait for the application to fully load before sending keystrokes.
My guess is that the issue lays in the speed of the keystrokes and\or the readiness of the application you are sending the keys to.
For any future inquires regarding this code, please contact me at the ambrielnet.com website, where you will find the most current ways to reach me.
Thank you very much. (If this comment was disrespectful, please report it.)
Add Your Feedback
Your feedback will be posted below and an email sent to
the author. Please remember that the author was kind enough to
share this with you, so any criticisms must be stated politely, or they
will be deleted. (For feedback not related to this particular code, please
click here instead.)
By 7 Users
Download code
1/14/2005 8:42:42 AM: 
