//---------------------------------------------------------------------------

#ifndef VmxLabelH
#define VmxLabelH
//---------------------------------------------------------------------------
#include <SysUtils.hpp>
#include <Classes.hpp>
#include <Controls.hpp>
//---------------------------------------------------------------------------
class PACKAGE TVmxLabel : public TGraphicControl
{
private:
protected:
        TStrings *FLines;
        void __fastcall SetLines (TStrings *New);
        void __fastcall SetPos (int New);
        void __fastcall Paint (void);
        int FMax, FPos;
        TNotifyEvent FOnChangeScrollMax;
public:
        __fastcall TVmxLabel(TComponent* Owner);
__published:
        __property TStrings *Lines = {read = FLines, write = SetLines};
        __property Align;
        __property Anchors;
        __property Visible;
        __property int ScrollMax = {read = FMax};
        __property int ScrollPos = {read = FPos, write = SetPos};
        __property TNotifyEvent OnChangeScrollMax = {read = FOnChangeScrollMax, write = FOnChangeScrollMax};
        __property Font;
        __property ParentFont;
};
//---------------------------------------------------------------------------
#endif
