{ snipdata.pas } unit SnipData; interface {$IfDef VER80} uses WinTypes, WinProcs, DbiProcs, DbiTypes, DbiErrs; {$Else} uses WinTypes, WinProcs, WinDos, Strings, DbiProcs, DbiTypes, DbiErrs; {$EndIf} type INT16 = Integer; UINT16 = Word; UINT32 = LongInt; FLOAT = Double; var { General global data } hInst: Word; GlobBuf: pCHAR; DeskRect: TRECT; hMainWnd, hViewEdit, hDescEdit: HWND; szDefTblDirectory: DBIPATH; szTblDirectory, szPrivDirectory: pCHAR; { IDAPI specific data } SnipItDb: hDBIDb; implementation end.