//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include "RichView.hpp"
#include "RVScroll.hpp"
#include "RVStyle.hpp"
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
    TImage *Image1;
    TLabel *Label1;
    TLabel *Label2;
    TLabel *Label3;
    TRichView *RichView1;
    TPanel *panMouseDown;
    TPanel *panMouseUp;
    TPanel *panRightClick;
    TPanel *panDblClick;
    TRVStyle *RVStyle1;
    void __fastcall RichView1RVDblClick(TCustomRichView *Sender,
	TRVRawByteString ClickedWord, int Style);
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall RichView1RVMouseDown(TCustomRichView *Sender,
    TMouseButton Button, TShiftState Shift, int ItemNo, int X, int Y);
    void __fastcall RichView1RVMouseUp(TCustomRichView *Sender,
    TMouseButton Button, TShiftState Shift, int ItemNo, int X, int Y);
    void __fastcall RichView1RVRightClick(TCustomRichView *Sender,
    TRVRawByteString ClickedWord, int Style, int X, int Y);
private:	// User declarations
    UnicodeString MouseInfo(TMouseButton Button, TShiftState Shift, int ItemNo, int X, int Y);
public:		// User declarations
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
