Well that FindNextControl function always returns nil. Now I am at my wits end. Any suggestions?
----- Original Message ----- From: "Richard R" <[EMAIL PROTECTED]> To: "Delphi-Talk Discussion List" <[email protected]> Sent: Monday, October 31, 2005 5:44 AM Subject: Re: FindNextControl > 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 > __________________________________________________ Delphi-Talk mailing list -> [email protected] http://www.elists.org/mailman/listinfo/delphi-talk
