首页 相关文章 在RichEdit中实现超链接

在RichEdit中实现超链接

  首先在Form上放置一个RichEdit。

  在窗体的构造函数中添加以下代码:

  

__fastcall TMainForm::TMainForm(TComponent* Owner)
    : TForm(Owner)
{
  unsigned mask = SendMessage(RichEdit1-Handle, EM_GETEVENTMASK, 0, 0);
  SendMessage(RichEdit1-Handle, EM_SETEVENTMASK, 0, mask | ENM_LINK);
  SendMessage(RichEdit1-Handle, EM_AUTOURLDETECT, true, 0); //自动检测URL
  RichEdit1-Text = "欢迎访问C++ Builder\n"
           "网址: http://www.ccrun.com\n"
           "偶的信箱:\n"
           "mailto::info@ccrun.com \n"
           "嘿...[ 查看全文 ]

2016-02-19 标签:

在RichEdit中实现超链接的相关文章

手机页面
收藏网站 回到头部