unit vimage

A unit to load a variety of image formats

author: Steven Don, Tomasz Biela (Tebe)


VBXE

Constants:

name:value:description:
FileNotFound$01
UnsupportedFormat$02
TooLarge$03

Register Variables:

name:address:type:description:
Buffer$0400array [0..0] of byte

Interface:

name:description:
UpdateXDL

procedure UpdateXDL(Location: cardinal; Top: word; Height: word);



    LoadPalette

    procedure LoadPalette(cnt: byte; x, ln, a,b,c: byte);



      LoadVPCX

      function LoadVPCX(Filename: TString; Location: cardinal): Boolean;


      This loads a PCX File (8bit)
        LoadVBMP

        function LoadVBMP(Filename: TString; Location: cardinal): Boolean;


        This loads a BMP File (4bit, 8bit)
          LoadVGIF

          function LoadVGIF(FileName: TString; Location: cardinal): Boolean;


          This loads a GIF File (GIF87a)