Unit1.cpp
上传用户:daoqigc
上传日期:2021-04-20
资源大小:2795k
文件大小:2k
源码类别:

RichEdit

开发平台:

Delphi

  1. /*=============================================================================
  2.  The most simple application with RichView Package - "Hello World!"
  3.  There are two components on the form:
  4.  TRichView* RichView1  - component for displaying text
  5.  TRVStyle* RVStyle1    - components for customizing appearance of RichView;
  6.  RichView1->Style is set to RVStyle1;
  7.  See more comments in TForm1::FormCreate
  8. {=============================================================================*/
  9. #include <vclvcl.h>
  10. #pragma hdrstop
  11. #include "Unit1.h"
  12. //---------------------------------------------------------------------------
  13. #pragma link "RichView"
  14. #pragma link "RVScroll"
  15. #pragma link "RVStyle"
  16. #pragma resource "*.dfm"
  17. TForm1 *Form1;
  18. //---------------------------------------------------------------------------
  19. __fastcall TForm1::TForm1(TComponent* Owner)
  20. : TForm(Owner)
  21. {
  22. }
  23. //---------------------------------------------------------------------------
  24. void __fastcall TForm1::FormCreate(TObject *Sender)
  25. {
  26.   // This line adds one line of text in RichView.
  27.   RichView1->AddNL("Hello World!", 0, 0);
  28.   // But text will not be displayed yet.
  29.   // You need to call Format method after adding
  30.   // all contents to RichView:
  31.   RichView1->Format();
  32.   // More about AddNL method:
  33.     // The first parameter of method ("Hello World!") is a text to display
  34.     // The second parameter defines text attributes of added text;
  35.     //  It is an index in the collection of text styles (RVStyle1->TextStyles)
  36.     //  You can customize collection of styles using Object Inspector
  37.     //  (for Delphi 3+, CB 3+)
  38.     // Third parameter defines paragraph attributes of added text;
  39.     //  It is an index in the collection of paragraph styles (RVStyle1->ParaStyles)
  40.   // AddNL is one of methods for adding contents to RichView (Add*** methods)
  41.   // See "Building RichView Document" topic of help file.
  42.   // These methods append items to RichView. But component is not prepared for
  43.   // displaying data until Format method is called.
  44. }
  45. //---------------------------------------------------------------------------