ok_final
type TMyObject = class(TObject)
This item has no description.
procedure MyFinalMethod; virtual; final;