Constants
Home Up Feedback Contents Search

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 }


Copyright © 1985 to 2022 Beta Systems                            Last modified: Wednesday, January 05, 2022 .