Re: Howto listen for key-event?

Article View: borland.public.delphi.nativeapi

Article #12116

Back to borland.public.delphi.nativeapi Previous Next

#12116

From: Jason
Date: Sun, 24 Nov 2002 01:04

12 lines
1173 bytes

Assign KeyPreview to TRUE on your Main Form

Then add this procedure

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key := #27 then
do something
end;


If you want continually watch for that key put in in a timer

Technical Details

Message-ID: <3de02734$1@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-06!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail

References: <3de01f20@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f94dd,23c561d43814c3b4,start
X-Google-Attributes: gidf94dd,public
X-Google-ArrivalTime: 2002-11-23 17:15:50 PST
From: "Jason" <info@goff.nu>
Newsgroups: borland.public.delphi.nativeapi
References: <3de01f20@newsgroups.borland.com>
Subject: Re: Howto listen for key-event?
Date: Sat, 23 Nov 2002 19:04:44 -0600
Lines: 14
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4920.2300
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4920.2300
NNTP-Posting-Host: 66.233.81.225
Message-ID: <3de02734$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1038100276 66.233.81.225 (23 Nov 2002 17:11:16 -0800)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-06!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail

Reply to Parent Message