Delphi的VCL技术使很多程序员能够非常快速的入门
程序员门只要简单的拖动再加上少量的几个Pascal语句
呵呵
一个可以运行得非常良好的Delphi程序!恭喜你
你已经可以进行程序开发这个伟大的事业了
不过
当你学了一段时间后也许就不这么想了哦
因为Delphi是支持面向对象的语言
其实所有的VCLComponent都是基于面向对象的语言设计的
那么当我们用这些面向对象的东东来设计出一些不怎么面向对象的东东好象有些不伦不类的感觉
当然
这里不讨论用不用面向对象方法的好坏
也不想引起相关人士的抗议
毕竟
萝卜青菜
嘛
在Delphi中所有的控件都声明在Publish的关键字下这也是利用组件编程的默认位置这样如果一个Form想要引Form(假如其为Unit)中的某个控件时只要Use Unit就OK了如果Form要引用Form的东东也可以如法泡制不过如果哪天我不小心把Form中的控件改了名那岂不是Form中调的的代码全部要重写了么?所以我主张把这些控件作为Form类的专用元素外部窗体可以通过Form类公布的属性来访问其中的控件
比如
TForm=class(Tform)
privte
Button:Tbutton
end;
不过这样的设计是解决了成员的高度封装不过编译会出现错误说Tbutton类找不到原因是我们把Button放到了Private中Delphi不会自动帮我们注册Tbutton类其实解决这个问题也很简单只要在
Initialization
中加入RegisterClasses([Tbutton])
就OK了当然如果有不同的类的控件都可以如法炮制放在RegisterClasses的参数中因为其参数是一个控件数组