//---------------------------------------------------------------------------
//Kangin D.N., 2005
#ifndef ruler1H
#define ruler1H
//---------------------------------------------------------------------------
#include <SysUtils.hpp>
#include <Classes.hpp>
#include <Controls.hpp>
typedef enum{orHorizontal, orVertical} TOrientation;
//---------------------------------------------------------------------------
class PACKAGE TRuler : public TGraphicControl
{
__published:
    __property OnClick;

    __property OnContextPopup;

    __property OnDragDrop;
    __property OnDragOver;
    __property OnEndDock;
    __property OnEndDrag;
    __property OnDblClick;

    __property OnStartDock;
    __property OnStartDrag;
       __property float Min = { read = FMin, write = SetMin, default = 0};
       __property float Max = { read = FMax, write = SetMax, default = 0};
       __property float Interval = { read = FInterval, write = SetInterval, default = 1};
       __property Graphics::TColor Color = {read=FColor, write=SetColor, default=-2147483643 };

       __property Graphics::TColor MarksClr = {read=FMarksClr, write=SetMarksClr, default=-2147483643 };

       __property TOrientation Orientation = {read = FOrientation, write = SetOrientation};

       __property TFont* Font  = {read = FFont, write = SetFont};
       __property Align;

private:
       float FMin;
       void __fastcall SetMin(float Min0);

       float FInterval;
       void __fastcall SetInterval(float Interval0);

       void __fastcall SetFont(TFont* Font0);

       TColor FColor;
       
       TFont* FFont;
       void __fastcall SetColor(TColor Color0);

       TColor FMarksClr;
       void __fastcall SetMarksClr(TColor Clr0);

       TOrientation FOrientation;
       void __fastcall SetOrientation(TOrientation Orientation0);

       float FMax;
       TCanvas* FCanvas;
       void __fastcall SetMax(float Max0);
       
       void __fastcall Paint(void);

protected:
public:
       __fastcall TRuler(TComponent* Owner);
       __fastcall ~TRuler();
       __property TCanvas* Canvas = {read=FCanvas};

};
//---------------------------------------------------------------------------
#endif