TZRElementLibrary

type TZRElementLibrary = class(TObject)

protected

  function GetCount; virtual; abstract;

  function GetItem(); virtual; abstract;

  function Check(); virtual;

  function Calculate(); virtual; abstract;

  property Owner: TZRElementCollection; [r]

public

  constructor Create(); virtual;

  function IndexOf(); virtual;

  function GetValue();

  procedure SetValue(); virtual; abstract;

  property Count: Integer; [r]

  property Items []: string; default; [r]

  property Description: string; [rw]

  property Name: string; [rw]

  property Vendor: string; [rw]

end;

TZRElementLibrary

TObject