Código Delphi [-]if AControl.CanFocus then AControl.SetFocus;
if AControl.CanFocus then AControl.SetFocus;