TJppPngCollection

type TJppPngCollection = class(TComponent)

protected

  procedure Notification(); override;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Clear;

  procedure EnableAll;

  procedure DisableAll;

  function PngIndex();

  function Count;

  function IsValidIndex();

  function AddPngImageFromFile();

  function AddPngImage();

  function GetPngImage();

  function GetPngImageByName();

  function ReportStr;

  procedure SetImagePicture();

published

  property Items: TJppPngCollectionItems; [rw]

  property TagExt: TJppTagExt; [rw]

  property Image: TImage; [rw]

  property ImageIndex: Integer; [rw]

end;

TJppPngCollection

TObject