⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit1.cpp

📁 与Action相结合,可以解决中文件显示乱码
💻 CPP
字号:
/*=============================================================================}
{ This demo shows how to add pictures and horizontal lines into RichView.      }
{                                                                              }
{ This demo also shows how to use background image.                            }
{ RichView1->BackgroundBitmap is assigned to some image, and                   }
{ RichView1->BackgroundStyle is set to bsTiled                                 }
{=============================================================================*/
#include <vcl\vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma link "RichView"
#pragma link "RVScroll"
#pragma link "RVStyle"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{

  RichView1->Clear();
  RichView1->AddNL("Example of adding images", 1, 1);

  // Adding "break" - horizontal line
  RichView1->AddBreak();

  RichView1->AddNL("Adding icon:", 0, 0);
  // RichView frees inserted graphics when needed.
  // So RichView1->AddPictureEx("", Image1->Picture->Graphic, -1, rvvaBaseline)
  // will cause error. We need to create a copy of graphic.

  TIcon* ico = new TIcon;
  ico->Assign(Image1->Picture->Graphic);
  RichView1->AddPictureEx("", ico, -1, rvvaBaseline);

  RichView1->AddNL("Adding bitmap:", 0, 0);

  // Adding bitmap from file:
  Graphics::TBitmap * bmp = new Graphics::TBitmap;
  bmp->LoadFromFile(ExtractFilePath(Application->ExeName)+"bars.bmp");
  RichView1->AddPictureEx("", bmp, -1, rvvaMiddle);

  RichView1->AddBreak();

  RichView1->Format();

  // About AddPictureEx:
  // 1st parameter: name of picture. Allows to hold additional text information
  //  together with image. There is no predefined meaning of this
  //  parameter. May be in future this string will be shown as a hint.
  // 2nd parameter: image. TBitmap, TIcon, TMetafile, etc.
  // 3rd parameter: index of paragraph style (-1 to continue paragraph)
  // 4th parameter: vertical align of image.
  //  In current version RichView supports two options:
  //  - rvvaBaseline: align bottom of image to base line of text;
  //  - rvvaMiddle: align middle of image to base line of text;
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -