Luke,
Here's a component I've used for this:
type
TTabEdit = class(TEdit)
private
FAcceptTabs:Boolean;
procedure WMGetDlgCode(var message: TMessage); message WM_GETDLGCODE;
public
property AcceptTabs : Boolean read FAcceptTabs write FAcceptTabs;
end; { TTabEdit }
procedure TTabEdit.WMGetDlgCode(var message: TMessage);
begin
if AcceptTabs then
message.Result := DLGC_WANTARROWS or DLGC_WANTCHARS or DLGC_WANTTAB
else
message.Result := DLGC_WANTARROWS or DLGC_WANTCHARS;
end; { WMGetDlgCode }
Regards, Paul.
-----Original Message-----
From: Luke Pascoe [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, June 13, 2001 4:25 PM
To: Multiple recipients of list delphi
Subject: [DUG]: I don't recall if I already asked this but...
...How do you trap the tab key in a TEdit and stop it moving focus to the
next component? I want to trigger an event on tab. OnKeyDown/Press doesn't
work, and OnKeyUp is too late :-(
========================================================
Luke Pascoe Delphi Programmer
enSynergy Consulting LTD
[EMAIL PROTECTED] +64-9-3551593 fax +64-9-3551590
Level 4, 10-12 Federal St, Auckland, New Zealand
PO Box 32521, Devonport, Auckland 1330, New Zealand
================== I.H.T.F.P. ==========================
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
