RichEdit

开发平台：

Delphi

Unit1.h：源码内容

							//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <vclClasses.hpp>
#include <vclControls.hpp>
#include <vclStdCtrls.hpp>
#include <vclForms.hpp>
#include <vclExtCtrls.hpp>
#include "RVEdit.hpp"
#include "RichView.hpp"
#include "RVScroll.hpp"
#include "RVStyle.hpp"
#include <vclDialogs.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
	TPanel *Panel1;
	TButton *btnOpen;
	TButton *btnScan;
	TRichViewEdit *rve;
	TRVStyle *RVStyle1;
	TOpenDialog *od;
	TCheckBox *CheckBox1;
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall btnOpenClick(TObject *Sender);
    void __fastcall btnScanClick(TObject *Sender);
    void __fastcall rveJump(TObject *Sender, int id);
	void __fastcall rveKeyDown(TObject *Sender, WORD &Key, TShiftState Shift);
private:	// User declarations
    void __fastcall URLScanEvent(int OldStyleNo, int& NewStyleNo,
                                 bool ToHypertext);
public:		// User declarations
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

						