Adding Hyperlink Capability to RichText Boxes

原创 2002年03月09日 17:59:00
 

Adding Hyperlink Capability to RichText Boxes

This tip show how to add hyperlinks into a RichTextBox. What you need to create is two classes that will interact with the RichTextBox.

The two classes are CHyperlink and CHyperlinks.

CHyperlink

CHyperLink is a simple Class that describes a hyperLink and has a method to open the URL it points to.

Properties:

  • LinkUrl
  • LinkText

Methods:

  • OpenLink

The LinkUrl property is a string containing the URL (for example: http://www.microsoft.com).

The LinkText property is a string containing the text shown in the RTF box (Click here to go to Microsoft).

The OpenLink methods use the ShellExecute API function to launch the default webbrowser and passes the URL to it.

CHyperLinks

CHyperLinks is a collection class. It contains a collection of CHyperLink objects. When you develop an application you only need to create an object of the CHyperLinks class. CHyperLinks also uses VB WithEvent keyword to "catch" the events of the RTF box that have the hyperlinks.

Properties:

  • Normal collection properties as Count, Item and NewEnum.
  • RichTextBox

Methods:

  • Add
  • Remove

The RichTextBox property is actually a RichTextBox object. You must set this object to a RichTextBox on a form.

The Add methods takes three arguments:

object. LinkText, LinkURL [, Key]

For example lets say you have a RichTextBox, named RichTextBox1, on a form and you want to add a hyperlink to VB-World to it. Then use this code:

 
 hlkLinks   CHyperLinks

  Form_Load()
     hlkLinks.RichTextBox = RichTextBox1
    hlkLinks. "Go to VB-World", "www.vb-world.net"
 Sub

The Add method will add a CHyperLink object to the collection AND add the text "Go to VB-World" to the RichTextBox1 object. This text will be underlined and in the colour blue.

When you click on this hyperlink in the RTF box (you will not see a hand cursor) the CHyperLink will trap that event and open your browser and point it to VB-World.

The Remove method will only remove the hyperlink from the collection. It will not change the text in the RTF box.

You can add these two classes into any project or you can compile them into an ActiveX DLL.

rtf.gif
Completed Hyperlink Demo Project

I have attached a project that show you how to use the classes. It is written in VB5. The zip file also includes two text files that contain the code of two classes that you can just cut and paste if you're not able to open the project.

Tip by Joacim Andersson

Excel的hyperlink函数使用方法详解

http://www.datasoldier.net/post/hyperlink.html hyperlink()可不是一个简单的excel超链接函数,它让excel电子表格和你想要的目标...
  • yibo492387
  • yibo492387
  • 2014年12月10日 17:43
  • 1979

CMMI(Capability Maturity Model Integration,软件能力成熟度模型集成)基础知识

前言:        公司今日进行CMMI3级的例行培训,这也是我进入公司一年多以来第一次参加这种培训。在培训中,老师主要询问了我们项目组在整个开发过程中是否符合了软件的基本开发流程,所有基本的需求...
  • inter_peng
  • inter_peng
  • 2015年03月25日 09:13
  • 1250

faster r-cnn训练问题集

1、出现问题:训练faster rcnn时出现如下报错: File "/py-faster-rcnn/tools/../lib/datasets/imdb.py", line 108, in a...
  • u012841667
  • u012841667
  • 2016年12月26日 16:33
  • 415

[寒江孤叶丶的Cocos2d-x之旅_21]3.x RichText自动适应高度,formarRenderers 自动更改高度 疑似BUG修复

原创文章,欢迎转载,转载请注明:文章来自[寒江孤叶丶的CrossApp之旅系列] 博客地址:http://blog.csdn.net/qq446569365 RichText 是Cocos GUI...
  • qq446569365
  • qq446569365
  • 2014年12月12日 11:17
  • 2669

Linux的capability深入分析

原文链接: http://www.cnblogs.com/iamfy/archive/2012/09/20/2694977.html 一)概述: 1)从2.1...
  • liuer2004_82
  • liuer2004_82
  • 2016年02月14日 19:58
  • 1454

RichTextEx一款通过HTML标签控制文字样式的富文本控件

RichTextEx一款通过HTML标签控制文字样式的富文本控件 原创文章,欢迎转载,转载请注明:文章来自[寒江孤叶丶的Cocos2d-x之旅系列] 博客地址:http://blog.cs...
  • wtuetnsrmh
  • wtuetnsrmh
  • 2015年09月11日 11:56
  • 1124

Cocos2dx-- 聊天系统之富文本(RichText)与字体对齐

前言游戏开发中我们一般都会有聊天系统,我们可以同时或单独发文字,图片,表情,超链接等信息的文本即称为富文本。如下图所示: 我使用的是cocos-3.4引擎版本里的RichText富文本控件实现这些操...
  • u010223072
  • u010223072
  • 2015年10月10日 16:54
  • 7031

cocos2dx实现功能强大的RichText控件

最近准备做一个聊天系统,开始准备使用cocos2dx的UIRichText控件来显示聊天内容,结果在使用的时候才发现,cocos2dx的RichText功能非常有限,完全不具备实现聊天的功能,只实现了...
  • ycg514230
  • ycg514230
  • 2014年05月18日 11:35
  • 17221

pcie的8个capability(功能号)的查找

PCIe的capability代表PCIe设备是否具备某种功能,例如在 static __inline__ int drm_pci_device_is_agp(struct drm_device *...
  • tiantao2012
  • tiantao2012
  • 2017年03月25日 11:07
  • 706

Unity新UI系统概述——Rich Text

UI元素和text meshes的文本可以混合使用多种字体风格和大小。新的和旧的UI系统都支持富文本。Text,GUIStyle和TextMesh类都有用于指示Unity查询文本内部标记标签的富文本设...
  • u014630768
  • u014630768
  • 2014年11月29日 19:34
  • 4030
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Adding Hyperlink Capability to RichText Boxes
举报原因:
原因补充:

(最多只允许输入30个字)