Unit Frrul

Classes

THFrRUL - added by gdW
TVFrRUL -

Functions

Register -

Types

THZPosition
TUnitOfMeasure
TVTPosition

Constants

Variables


Functions


procedure Register;


Types


THZPosition = (posBottom,posTop);
based on RULERS By Bill Murto and Frrul by Olivier Dahan ***** Fixed: * actually IS accurate now (just needed a 'word' to 'single' fix) * added 'UnitOfMeasure' for swapping from inches to cm * added 'Position' for setting direction of marks * removed unnecessary default values in declarations (much more effecient * to initialise values only in the 'Create' code) ***** by gdW from Australia... gdwood@hotmail.com} {$D-,L-,S-
TUnitOfMeasure = (umCentimetres,umInches);
added by gdW
TVTPosition = (posRight,posLeft);
added by gdW

Constants


Variables