Well I found out what was wrong. I was accessing it wrong. Seems it is
accessible using it directly without resorting to type casting.
procedure TMainForm.Tsx1TrapKey(wParm, lParm: Cardinal);
var
kydown: boolean;
ac: TWinControl;
begin
if (tsxMain = nil) then
exit;
kydown:= (lParm and ($1 shl 31)) <> 0;
if ((wParm = VK_TAB) and kydown) then begin
ac:= FindNextControl(ac, True, True, True);
repeat
if Assigned(ac) then begin
ac.SetFocus;
break;
end;
ac:= FindNextControl(ac, True, True, True);
until (ac = nil);
end;
end;
----- Original Message -----
From: "Richard R" <[EMAIL PROTECTED]>
To: "'Delphi-Talk Discussion List'" <[email protected]>
Sent: Monday, October 31, 2005 5:31 AM
Subject: FindNextControl
> Hello, why is FindNextControl not available for using in TWinControl?
>
> TWinControl(Screen.ActiveControl), in the list of drop down functions,
> FindNextControl isnt there. I look in the source code and find it's
> located
> in the protected section of the class. What should I do?
> __________________________________________________
> Delphi-Talk mailing list -> [email protected]
> http://www.elists.org/mailman/listinfo/delphi-talk
>
__________________________________________________
Delphi-Talk mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi-talk
