Neven
To move to the next control you could also use something like:
PostMessage(MyHandle, WM_NextDlgCtl, 0, 0);
where MyHandle is the handle of the parent form.
HTH
Regards
Martin
-----Original Message-----
From: Neven MacEwan [SMTP:[EMAIL PROTECTED]]
Sent: Thursday, February 03, 2000 4:29 PM
To: Multiple recipients of list delphi
Subject: Re: [DUG]: AutoExiting a Control
Aaron thanks for the tip - but to make it work I had to
TnkmParent = class(TWinControl)
protected
procedure GotoNextControl(From: TWinControl);
end;
with
procedure TnkmParent.GotoNextControl(From: TWinControl);
var
C: TWinControl;
begin
C := FindNextControl(From,True,True,False);
if C <> nil then C.SetFocus;
end;
and then in my component
procedure TnkmCustomEdit.AutoExit;
var
P :TnkmParent;
begin
P := TnkmParent(Parent);
P.GotoNextControl(Self);
end;
"WorldSecure <sovereign.co.nz>" made the following
annotations on 02/03/00 16:49:59
------------------------------------------------------------------------------
[INFO] -- Content Manager:
This e-mail message and any attachments are confidential to Sovereign Limited and
subsidiaries and subject to legal privilege. If you have received this e-mail in
error, please advise the sender immediately and destroy the message and any
attachments. If you are not the intended recipient you are notified that any use,
distribution, amendment, copying or any action taken or omitted to be taken in
reliance of this message or attachments is prohibited.
==============================================================================
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
