5 function IsTransporent(id
: integer) : boolean;
6 function IsForeground(id
: integer) : boolean;
7 function IsOverlapped(id
: integer) : boolean;
13 function IsTransporent(id
: integer) : boolean;
15 result
:= (items_store
.GetBlockFlags(id
) and 1) <> 0;
18 function IsForeground(id
: integer) : boolean;
20 result
:= (getBlockFlags(id
) and 2) <> 0;
23 function IsOverlapped(id
: integer) : boolean;
25 result
:= (getBlockFlags(id
) and 4) <> 0;