ok_abstract_sealed
type TOrdinaryClass = class(TObject)
description of TOrdinaryClass
TOrdinaryClass
var AVariable: integer;
procedure AProcedure;
description of AVariable
AVariable
description of AProcedure
AProcedure