ok_generic
type TGeometryAttrib = class(TObject)
Name: string;
AType: TGeometryAttribType;
Offset: Integer;