| Class TPMGFGroup (unit PMGrpFile) |
TObject
describing information as offered to user of this unit
| Constructors |
constructor Create(FileName: string);| Functions |
procedure CloseAllItems;
procedure CloseItem(I: ItemIndexSet);
destructor Destroy;
procedure OpenAllItems;
procedure OpenItem(I: ItemIndexSet);
procedure GetBlk(Offset: Word; var Buffer; Count: Word);| Properties |
| Events |
| Variables |
BitsPerPixel : Word;
CmdShow : Word;
GroupName : string[32];
GrpFileName : string[80];
Items : TStringList;
LogPixelsX : Word;
LogPixelsY : Word;
MinPoint : TPoint;
NormalRect : TRect;
Planes : Word;
Dir : array[ItemIndexSet] of Word;
F : file;
FSize : Longint;
Hot : array[ItemIndexSet] of Word;
Its : array[ItemIndexSet] of Word;
Min : array[ItemIndexSet] of Boolean;| Constructors |
constructor Create(FileName: string);tagdata: run minimized
| Functions |
procedure CloseAllItems;
procedure CloseItem(I: ItemIndexSet);quirk in .prg file strcuture
destructor Destroy;flush first info
procedure OpenAllItems;
procedure OpenItem(I: ItemIndexSet);
procedure GetBlk(Offset: Word; var Buffer; Count: Word);last record
| Properties |
| Events |
| Variables |
BitsPerPixel : Word;icon bitmaps: intended vert. resolution
CmdShow : Word;name of group
GroupName : string[32];path name of .grp file
GrpFileName : string[80];
Items : TStringList;icon bitmaps: count of planes
LogPixelsX : Word;group window: icon-window lower-left corner point
LogPixelsY : Word;icon bitmaps: intended hor. resolution
MinPoint : TPoint;group window: normal-window rectangle
NormalRect : TRect;group window: sw xxxx constant
Planes : Word;icon bitmaps: bits-per-pixel
Dir : array[ItemIndexSet] of Word;offsets to item info
F : file;itemnames, with associated TGrpItem objects
FSize : Longint;opened in constructor, closed in destructor
Hot : array[ItemIndexSet] of Word;tagdata: offsets to dirs
Its : array[ItemIndexSet] of Word;size of file
Min : array[ItemIndexSet] of Boolean;tagdata: hotkeys