TDPKSExtraData = class
       Property Dobavljac:integer read;
       Property Proizvodjac:integer read;
       Property Category:integer read;
       Property Subcategory:integer read;
       Property SifraDobavljaca:string read;
       Property SifraProizvodjaca:string read;
       Property Tezina:extended read;
       Property ModelFile:string read;
       Property ElementFile:string read;

   end;