《Mastering Delphi 6》学习笔记之十一

原创 2001年12月04日 09:50:00

CLX及其它

 

Mastering Delphi 6》中提到Object Pascal中有一个TBits类,用来进行二进制位操作。我看过这一段之后马上去找,果然在Classes单元中找到了它。这个类的声明相当简单,不过我看过后感慨很多。如果不知道这个类的存在,我以后可能还要在需要操作二进制位的时候辛辛苦苦的写一大串代码(我以前也写过不少这样的代码),要是能够早点知道有这个类的话该有多好!我相信还可能有很多人和我一样,从来不知道TBits的存在。因此,我决定以后一定要抽个时间,好好把Classes和System这些单元浏览一遍;虽然在没有多少文档的情况下去读这些文件不会轻松,但是很可能会发现一些有用的东西,从而避免去做重新发明轮子的傻事。<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

我过去总是觉得,Delphi的帮助系统比起MSDN来是有很大差距的。这次我倒是发现了一个相反的例证。通过对Classes单元一个走马观花的浏览,我发现一个ExtractStrings函数,毫无疑问是非常有用的。虽然在一般的教材中都找不到关于它的介绍,不过在线帮助中确实有关于它的完整描述。自己作个例子试试看,和猜想的用法相差不远。这让我想起MFC中也有一个类似的AfxExtractSubString,同样有用,但庞大的MSDN中就是找不到它的帮助(其实,MFC中类似的Afx函数,只有很少的一部分才有文档资料,其他的都属于Undocumented。)虽然这一个小地方不能证明什么,但至少说明Borland在帮助系统的完整性方面还是用心了的,这让我对Delphi帮助系统稍稍有了一些正面印象。

 

Delphi 6中帮助系统的主题一般都有VCL Reference和CLX Reference两种,如果按F1的话,首先会弹出一个对话框询问你到底选择那一个。时间长了就很烦人。这里有一个方法可以避免:如果你希望一直使用VCL的话,选择Help->Custom,将列表中所有有关CLX的项目一概删除,然后保存项目(当然,最好先将原先的设置备份一个,留给以后恢复用。)最后关闭再重新打开Delphi就行了。

 

Delphi 6现在支持VCL和CLX两个类库。CLX在底层是基于Qt这个类库的,可能有些朋友还没有听说过它的名字,不过在Linux系统上面Qt的名字可是非常响亮哦。你可以在新建一个项目的时候指定是使用VCL Application还是CLX Application,构件面板会自动变化,只显示对当前项目可用的构件。CLX构件和VCL构件从外观上总的来说是惊人的相似,当然在背后它们还是很不同的。CLX中有一些有意思的构件在VCL中是找不到的,比如TextViewer和TextBrowser。而VCL中有一些构件在CLX中也没有对应,主要是Win32面板上的构件,不过CLX中也有类似的构件,虽然叫法不同。(《Mastering Delphi 6》中提到,和Windows系统通过消息机制通信的方法不同,Qt中采用的是更高层的面向对象封装,比如要操作一个按钮,不用像按钮发送消息,直接调用按钮的相应方法即可。应该把Qt也看作一种Application Framework,而且这种结构一定很值得学习,有机会的话应该看看。)虽然VCL和CLX都有不少好的构件,但它们是无法共同使用的,也就是说,没有办法在VCL Application中使用CLX构件,反之亦然。

 

Mastering Delphi 6》中有一个很妙的例子,用到CLX中的TextViewer。这个构件的特点是完全基于HTML的,而它有Text属性,因而又和Memo相兼容。所以,只要建立一个CLX Application,在窗体上面放上一个Memo和一个TextViewer,并修改Memo的OnChange事件:

procedure TForm1.Memo1Change(Sender: TObject);

begin

  TextViewer1.Text := Memo1.Text;

end;

简简单单的一句话,产生出来的可是一个非常强的工具,你可以在Memo中按照HTML格式写内容,比如“<A HREF=”http://marcocantu.com”><IMG SRC=”viewme.gif”></A>”在TextViewer中立刻就能够看到效果,非常好的HTML学习工具哦。不过要说明的一点是,TextViewer的显示效果和我们通常在IE中看到的会有一些区别,有些网页效果是显示不出来的。但即便如此,这个程序还是让我兴奋了半天。

 

 

由于Qt的内置功能和Linux的可定制特性,因而CLX程序的外观可以是千变万化的,这就比Windows的单一外观要有趣一些。《Mastering Delphi 6》中举了一个例子。建立一个CLX Application,其中添加一个列表框和其他一些常用构件。在ListBox中增加几个表项,分别是Windows,Motif,Motif+,CDE,SGI,Platinum,SystemDefault。为ListBox增加OnDblClick处理:

procedure TForm1.ListBox1DblClick(Sender: TObject);

begin

  case ListBox1.ItemIndex of

    0: Application.Style.DefaultStyle := dsWindows;

    1: Application.Style.DefaultStyle := dsMotif;

    2: Application.Style.DefaultStyle := dsMotifPlus;

    3: Application.Style.DefaultStyle := dsCDE;

    4: Application.Style.DefaultStyle := dsQtSGI;

    5: Application.Style.DefaultStyle := dsPlatinum;

    6: Application.Style.DefaultStyle := dsSystemDefault;

  end;

end;

可以看到程序显示多变的外观。其实这些外观并不是都很好看,但很有趣。如果是在Linux底下,通过定制Window Manager,还可以产生更多的变化,相信不会输给XP的超眩外观。

《Mastering Delphi 6》学习笔记之八

构件自动清除的内幕 我们已经知道,TComponent在释放自身的时候会自动删除它Owns的所有Component,这是Delphi程序的一个极大特点。否则的话,任何动态生成的对象比如Menu Ite...
  • weizhisheng
  • weizhisheng
  • 2001年12月04日 09:45
  • 1033

《Mastering Delphi 6学习笔记》之二

 《Mastering Delphi 6学习笔记》之二 本文是我在阅读《Mastering Delphi 6》一书过程中的一些心得笔记,一方面因为原书是英文版,所以将一些我认为比较重要的部分整理和摘录...
  • weizhisheng
  • weizhisheng
  • 2001年11月20日 18:41
  • 756

《Mastering Delphi 6》学习笔记之六

《Mastering Delphi 6》学习笔记之六Delphi 6中对RTL增加了不少函数和Helper Class,虽然不算翻天覆地的大变化,不过确实方便不少。如果有时间的话,建议大概浏览一下新增...
  • weizhisheng
  • weizhisheng
  • 2001年11月25日 00:40
  • 982

《Mastering Delphi 6》学习笔记之九

无名称构件的使用 我曾在许多Delphi资料中看到这样的说法:每一个Component都必须有一个不为空的Name,用于和其他Component相区分。过去我也对这种说法深信不疑。但是看过《Maste...
  • weizhisheng
  • weizhisheng
  • 2001年12月04日 09:49
  • 859

《Mastering Delphi 6》学习笔记之十

  • zgqtxwd
  • zgqtxwd
  • 2008年04月30日 17:20
  • 79

《Mastering Delphi 6》学习笔记之五

《Mastering Delphi 6》 学习笔记之五 在某个类中用protected声明的变量,在本单元之外是不能够随意访问的(通过声明子类才可以访问其protected域)。《Mastering ...
  • weizhisheng
  • weizhisheng
  • 2001年11月25日 00:27
  • 800

《Mastering Delphi 6》学习笔记之七

  • zgqtxwd
  • zgqtxwd
  • 2008年04月30日 17:23
  • 128

《Mastering Delphi 6》学习笔记之四

《Mastering Delphi 6》 学习笔记之四在C++中,我们可以用static来声明一个属于类而不是类的某个具体实例的函数。许多人以为Object Pascal没有类似的功能,其实是有的,只...
  • weizhisheng
  • weizhisheng
  • 2001年11月25日 00:13
  • 925

Mastering Delphi7 阅读笔记(摘要) 续

 第12章  从COM到COM+  本章主要内容   OLE和COM技术历史简介   实现IUnknown   第一个COM服务器   自动化   编写一个自动化服务器   使用复合文档   介绍Ax...
  • qffhq
  • qffhq
  • 2006年12月31日 15:00
  • 1990

Mastering Delphi7 阅读笔记(摘要) 前八章

前八章目录:第一部分  基础第1章  Delphi7及其IDE    Delphi的版本    IDE概述    Delphi编辑器    窗体设计器    组件面板的秘密    管理项目    附加...
  • qffhq
  • qffhq
  • 2006年12月26日 09:41
  • 4521
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:《Mastering Delphi 6》学习笔记之十一
举报原因:
原因补充:

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