if _prop_TabOrder <> 0 then begin
   Style := Style or WS_TABSTOP;
   LookTabKeys := [tkTab];
   TabOrder := _prop_TabOrder;
end else
   TabStop := False;