const SortOrderAscii: Pointer = nil; const SortOrderIntl: Pointer = @SrtOrderIntl; const SortOrderNorDan: Pointer = @SrtOrderNorDan; const SortOrderSwedFin: Pointer = @SrtOrderSwedFin; const SortOrderNorDan4: Pointer = @SrtOrderNorDan4; const BLANKDATE: Longint = $80000000; BLANKLONG: Longint = $80000000; BLANKSHORT = $8000; BLANKALPHA = ''; PXDEFAULT: Longint = 0; { use internal default value } MaxTableHandles = 64; { maximum number of open } { tables allowed at a time } DefTableHandles = 5; { default number of open } { tables allowed at a time } MaxRecordHandles = 512; { maximum number of record } { buffers available } DefRecordHandles = 10; { default number of record } { buffers available } MaxLockHandles = 128; { maximum number of lock } { handles per table } DefLockHandles = 32; { default number of lock } { handles per table } MaxFileHandles = 255; { maximum number of DOS file } { handles to use } MinFileHandles = 2; { minimum number of DOS file } { handles to use } DefFileHandles = 10; { default number of DOS file } { handles to use } DefSortOrder: Pointer = Ptr($0,$0); { default sort order (ASCII) } { Swap buffer size } MaxSwapSize = 256; { maximum buffer size allowed (k) } MinSwapSize = 8; { minimum buffer size allowed (k) } DefSwapSize = 32; { default buffer size (k) } { Network types used in PXNetInit } { The type is made up of two sections: locking protocol, and a sharing } { specification indicating which tables are vulnerable to sharing and need } { to be protected with the locking protocol. } { The locking protocol and the sharing specification must be or'ed together.} { locking protocol - choose one of the following (PX40LOCKING is default) } const PX35LOCKING = 64; { locking protocol compatible with Paradox 3.5 } PX40LOCKING = 0; { locking protocol compatible with Paradox 4.0 } { sharing specification - choose one of the following: } const LOCALSHARE = 32; { all tables can be shared (local and remote) } { e.g. from another Window or DOS shell. locking } { is needed on all tables } NETSHARE = 2; { only tables on the net can be shared, tables } { on the local drive can be treated as private } NOSHARE = 1; { all tables can be treated as private, no locking } { is needed - behave like PXInit } { The following network codes are provided strictly for compatibility with } { the Paradox Engine 2.0; it is no longer necessary to be explicit as to } { which network you are running on: } const NOTONNET = 1; { not on a network } NOVELLNET = 2; { Novell } THREECOMNET = 3; { 3Com } THREEOPENNET = 4; { 3Com 3+Open } OTHERNET = 5; { other: unknown DOS 3.1 compatible } STARLANNET = 7; { Starlan } BANYANNET = 8; { Banyan } IBMPCNET = 9; { IBM PC } DefUserName = ''; { use default username in PXNetInit() } { used in PXKeyAdd } PRIMARY = 0; { primary index (key) } SECONDARY = 1; { non-maintained secondary index } INCSECONDARY = 2; { maintained secondary index } { used in PXSrchFld, PXSrchKey } SEARCHFIRST = 0; { search from beginning of table } SEARCHNEXT = 1; { search from next record in table } CLOSESTRECORD = 2; { goto 'nearest' record if no match found } { Lock types } { used in PXNetFileLock, PXNetFileUnlock, PXNetTblLock, PXNetTblUnlock } FL = 1; { full lock, no concurrency } WL = 2; { write lock } PWL = 3; { prevent write lock } PFL = 4; { prevent full lock, full concurrency } { values used in functions operating on Blobs (Binary Large OBjects) } PXBLOBREJECT = 0; { for use in PXBlobClose } PXBLOBACCEPT = 1; { for use in PXBlobClose } PXBLOBNEW = 0; { for use in PXBlobOpenWrite } PXBLOBCOPY = 1; { for use in PXBlobOpenWrite } { commonly used constants } Null: Longint = 0; { successful Engine function operation returns } PXSUCCESS = 0; { values for Mode argument to PXTblCreateMode } PARADOX35 = 0; { create Paradox 3.5 compatible tables } PARADOX40 = 1; { create Paradox 4.0 compatible tables } |
|