mainfrm.cpp

来自「与Action相结合,可以解决中文件显示乱码」· C++ 代码 · 共 34 行

//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop

#include "MainFrm.h"
//---------------------------------------------------------------------------
#pragma link "RVEdit"
#pragma link "RichView"
#pragma link "RVScroll"
#pragma link "RVStyle"
#pragma link "RVOfficeCnv"
#pragma resource "*.dfm"

// If you want to enable GIF support
// with Anders Melander's TGifImage http://www.melander.dk/delphi/gifimage/
// or http://www.torry.net/vcl/graphics/gif/gifimage.exe
// Open RVGif.pas from this project and remove dot from line
// {.$DEFINE USEGIFIMAGE}


TfrmMain *frmMain;
//---------------------------------------------------------------------------
__fastcall TfrmMain::TfrmMain(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::FormCreate(TObject *Sender)
{
  od->Filter = "RTF (Built-In RichView Import)|*.rtf|"+rvc->GetImportFilter();
  sd->Filter = "RTF (Built-In RichView Export)|*.rtf|"+rvc->GetExportFilter();

  rve->Clear();
  rve->Add("This demo shows how to use Microsoft