RichEdit

开发平台：

Delphi

RVDemo.cpp：源码内容

							//---------------------------------------------------------------------------
#include <vclvcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("MainFrm.cpp", frmMain);
USERES("RVDemo.res");
USEFORM("PopupFrm.cpp", frmPopup);
USEFORM("Demo1Frm.cpp", frmDemo1);
USEFORM("Demo2Frm.cpp", frmDemo2);
USEFORM("Demo3Frm.cpp", frmDemo3);
USEFORM("Demo4Frm.cpp", frmDemo4);
USEFORM("Demo5Frm.cpp", frmDemo5);
USEFORM("Demo6Frm.cpp", frmDemo6);
USEFORM("Demo7Frm.cpp", frmDemo7);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    try
    {
        Application->Initialize();
        Application->CreateForm(__classid(TfrmMain), &frmMain);
        Application->CreateForm(__classid(TfrmPopup), &frmPopup);
        Application->CreateForm(__classid(TfrmDemo1), &frmDemo1);
        Application->CreateForm(__classid(TfrmDemo2), &frmDemo2);
        Application->CreateForm(__classid(TfrmDemo3), &frmDemo3);
        Application->CreateForm(__classid(TfrmDemo4), &frmDemo4);
        Application->CreateForm(__classid(TfrmDemo5), &frmDemo5);
        Application->CreateForm(__classid(TfrmDemo6), &frmDemo6);
        Application->CreateForm(__classid(TfrmDemo7), &frmDemo7);
        Application->Run();
    }
    catch (Exception &exception)
    {
        Application->ShowException(&exception);
    }
    return 0;
}
//---------------------------------------------------------------------------

						