Unit anlRuler

Classes

TanlRuler - TanlRuler

Functions

Register -

Types

TIndentEvent
TIndentID
TMarginEvent
TMarginID
TRulerFactor
TRulerTab
TRulerTabdist

Constants

BmpSemi

Variables


Functions


procedure Register;


Types


TIndentEvent =  procedure (Sender: TObject ; IndentID :TIndentID) of object

TIndentID = (riFirst,riLeft,riRight,riBothLeft);
TRulerKind = (rbHorizontal, rbVertical; } {Not used by now
TMarginEvent =  procedure (Sender: TObject ; MarginID :TMarginID) of object

TMarginID = (rmLeft,rmRight);

TRulerFactor = 1..30000

TRulerTab = 1..255

TRulerTabdist = 1..30000

Constants

BmpSemi = 4

--------------------- TanlRuler Version 1.0 --------------------- Lefteris Loukis e-mail : lbst@hotmail.com (or try:) p93044@poseidon.cs.unipi.gr © April 1998, aLL nIgHt LoNg, Athens, Greece. DESCRIPTION: ------------ A FREEWARE ruler component that offers office 97's capabilities, such as draging margins, draging indents (First,left,right,Hanging), showing drag-line on associated richedit, office 97 presentation style, etc. Full source and demo included, please read the LICENCE and the DISCLAIMER included in the attached text file. DELPHI IDE: --------------- Delphi 1.0 = No Delphi 2.0 = ? (Not tested, if do so and have problems, please inform me) Delphi 3.0 = Yes The code is simple, and in most cases self explained, however if you have suggestions, questions, bugs, then please report 'em to me via e-mail : lbst@hotmail.com or p93044@poseidon.cs.unipi.gr

Variables