Rice Lake iRite IDE - Manual (Page 42)

38 920i Programming Reference
Example:
ScaleNumber : Integer;
…
ScaleNumber := CurrentScale;
GetMode
Sets M to the value representing the current display mode for scale S.
Method Signature:
function GetMode (S : Integer; VAR M : Mode) : SysCode;
Parameters:
[in] S Scale number
[out] U Current display mode
Mode values returned:
GrossMode Scale S is currently in gross mode.
NetMode Scale S is currently in net mode.
SysCode values returned:
SysInvalidScale The scale specified by S does not exist.
SysDeviceError The scale is reporting an error condition.
SysOK The function completed successfully.
Example:
CurrentMode : Mode;
…
GetMode (Scale1, CurrentMode);
GetUnits
Sets U to the value representing the current display units for scale S.
Method Signature:
function GetUnits (S : Integer; VAR U : Units) : SysCode;
Parameters:
[in] S Scale number
[out] U Current display units
Units values returned:
Primary Primary units are currently displayed on scale S .
Secondary Secondary units are currently displayed on scale S .
Tertiary Tertiary units are currently displayed on scale S .
SysCode values returned:
SysInvalidScale The scale specified by S does not exist.
SysDeviceError The scale is reporting an error condition.
SysOK The function completed successfully.
Example:
CurrentUnits : Units;
…
GetUnits (Scale1, CurrentUnits);
InCOZ
Sets V to a non-zero value if scale S is within 0.25 grads of gross zero. If the condition is not met, V is set to zero.
Method Signature:
function InCOZ (S : Integer; VAR V : Integer) : SysCode;
Parameters:
[in] S Scale number
[in] V Center-of-zero value