home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Hack-Phreak Scene Programs
/
cleanhpvac.zip
/
cleanhpvac
/
GFXFX2.ZIP
/
UNITINT.ZIP
/
U_FFLBM.INT
< prev
next >
Wrap
Text File
|
1995-02-14
|
690b
|
42 lines
(*
** Deluxe Paint II LBM & IFF files unit
**
** ILBM: InterLeaved BitMap
** IFF: Interchange Format Files, Electron Arts <tm> IFF 85
**
** ONLY SUPPORTED: Deluce Paint II enhanced non-compressed files!
**
** Made by Bas van Gaalen
*)
unit u_fflbm;
interface
uses dos,graph;
const
lbm_ok=0;
lbm_nofile=1;
lbm_errfile=2;
lbm_invalid=3;
lbm_palerr=4;
lbm_unknown=5;
type
lbm_inforec=record
xres,yres:word;
pixs:byte;
end;
var
lbm_status:byte;
function lbm_errstr:string;
function lbm_display(fname,bgipath:pathstr; vidmode:shortint):byte;
function lbm_info(fname:pathstr; var info:lbm_inforec):byte;
implementation