|##########|
|#MAGIC   #|CLABLMGG
|#PROJECT #|""
|#PATHS   #|"StdProject"
|#FLAGS   #|xx---x--x----xx-----------------
|#USERSW  #|--------------------------------
|#USERMASK#|--------------------------------
|#SWITCHES#|xx---xxxxx-xx---
|##########|
DEFINITION MODULE GfxIFF;
| Funktionen entsprechen denen aus dem Modul IFFPictures

FROM GfxScreen IMPORT Screen;


TYPE
  PackedBitMap  = HIDDEN;

VAR
  SaveCompress,               (* komprimiert abspeichern *)
  SaveIcon      : BOOLEAN;    (* Icon mitabspeichern     *)

(* Defaulttool für abzuspeichernde Bilder setzen *)
PROCEDURE SetToolType(REF Name : STRING);

(* IFFBild abspeichern *)
PROCEDURE SaveILBM(screen : Screen;REF Name : STRING);

(* IFFBild laden *)
PROCEDURE LoadILBM(REF Namen : STRING):Screen;

PROCEDURE LoadILBM_Packed(REF Namen : STRING):PackedBitMap;

PROCEDURE UnpackILBM(pack : PackedBitMap;scr : Screen);

PROCEDURE FreePacked(pack : PackedBitMap);

END GfxIFF.