🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.cppbuilder.nativeapi
Article #15903

Re: is any way to generate a KeyPress?

#15903
From: Hans Galema
Date: Fri, 06 Jun 2003 19:54
20 lines
1473 bytes
Hans Galema wrote:

> Have a look at keybd_event().

Or call the eventhandler yourself:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   char Key = 'A';

   FormKeyPress(Sender, Key);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormKeyPress(TObject *Sender, char &Key)
{
   ShowMessage ( Key );
}

Hans.
Technical Details
Message-ID: <3ee0f242@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-06!sn-xit-08!sn-xit-09!supernews.com!newsfeed.wirehub.nl!news.kweb.on.ca!KWeb!newsgroups.borland.com!not-for-mail
References: <3EE0C4FB.6030202@hotmail.com> <3ee0dba4$1@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10cc67,99f56699d01d64be
X-Google-Attributes: gid10cc67,public
X-Google-ArrivalTime: 2003-06-06 13:03:39 PST
Date: Fri, 06 Jun 2003 21:54:45 +0200
From: Hans Galema <j.m.galema.dontusethis@maartens.nl>
User-Agent: Mozilla/5.0 (Windows; U; Win98; en-US; rv:1.3.1) Gecko/20030425
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: borland.public.cppbuilder.nativeapi
Subject: Re: is any way to generate a KeyPress?
References: <3EE0C4FB.6030202@hotmail.com> <3ee0dba4$1@newsgroups.borland.com>
In-Reply-To: <3ee0dba4$1@newsgroups.borland.com>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
NNTP-Posting-Host: 129.125.108.11
Message-ID: <3ee0f242@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1054929474 129.125.108.11 (6 Jun 2003 12:57:54 -0700)
Lines: 21
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-06!sn-xit-08!sn-xit-09!supernews.com!newsfeed.wirehub.nl!news.kweb.on.ca!KWeb!newsgroups.borland.com!not-for-mail