RE: [DUG]: Tab across TabSheets

Tue, 27 May 2003 21:06:03 -0700

Title: Message
You need to handle the CMDialogKey message to handle the TAB.
 
procedure CMDialogKey(var Message: TCMDialogKey); message CM_DialogKey;
 
...
 
procedure TfWhatever.CMDialogKey(var Message: TCMDialogKey);
begin
  if (Message.CharCode = VK_TAB)  and (ActiveControl = eLastEditoronFirstTab) then begin
     pcPageControl.ActivePage := tsPage2;  
 end;
 inherited;
end;
-----Original Message-----
From: Allan, Samuel [mailto:[EMAIL PROTECTED]
Sent: Wednesday, 28 May 2003 15:45
To: Multiple recipients of list delphi
Subject: [DUG]: Tab across TabSheets

I have two tabsheets. When user presses tab in the last control on the first tabsheet I want to go to the first control of the second tabsheet.

Reply via email to