Yep,I forgot to include JPG unit into source code now everything works like a charm.

Code:
procedure Init;
  var
    mehtexture : zglPTexture;
begin
  
   mehtexture:= SFDS_Tex_Load( 'image.jpg', 'JPG' );
  end;
Thanks for the help!