home *** CD-ROM | disk | FTP | other *** search
/ Collection of Hack-Phreak Scene Programs / cleanhpvac.zip / cleanhpvac / GFXFX2.ZIP / UNITINT.ZIP / U_FFBMP.INT < prev    next >
Text File  |  1995-02-14  |  871b  |  42 lines
  1.  
  2. (*
  3. ** Windows 3.x <tm> DIB (Device-Independant Bitmap) - BMP - unit
  4. ** Most Windows and VPIC-converted BMP's are shown correctly. Better not
  5. ** try OS/2 <tm> BMP's: they'll probably hang with a runtime-error.
  6. **
  7. ** 4-bits RLE-compressed pictures are not supported, because I hadn't any
  8. ** to test the algo on. Because of the same reason I figured it wasn't
  9. ** realy usefull to implement it anyhow...
  10. **
  11. ** Made by Bas van Gaalen
  12. *)
  13.  
  14. unit u_ffbmp;
  15.  
  16. interface
  17.  
  18. uses dos,graph;
  19.  
  20. const
  21.   bmp_ok=0;
  22.   bmp_nobmp=1;
  23.   bmp_nofile=2;
  24.   bmp_nosupport=3;
  25.   bmp_errfile=4;
  26.  
  27. type
  28.   bmp_inforec=record
  29.     xres,yres:word;
  30.     pixs:byte;
  31.   end;
  32.  
  33. var
  34.   bmp_status:byte;
  35.  
  36. function bmp_errstr:string;
  37. function bmp_display(fname,bgipath:pathstr; vidmode:shortint):byte;
  38. function bmp_info(fname:pathstr; var info:bmp_inforec):byte;
  39.  
  40. implementation
  41.  
  42.