J
jinchi
Unregistered / Unconfirmed
GUEST, unregistred user!
这里也就是一个普遍的问题:如何去掉rad功能,直接采用面向对象编程方法实现
问题描述:
我想实现两个类的聚合关系。如:
--------------------------
|TMyClass:TObject |
|------------------------ / ----------------------------
|MySocket:TClientSocket |<>-------- |ClientSck:TClientSocket |
|------------------------- / ----------------------------
|各种方法 | |成员和方法 |
------------------------- -----------------------------
那么,也就是 ClientSck作为TMyClass的一个成员,这里我如何引用ClientSck的
OnError,OnRead,OnAccept,OnConnecting方法,好像只见到rad编程中直接双击产生
事件,而我需要在程序中直接引用vcl控件的各种方法,并实现功能扩展。
也就是vcl控件如何像一个普通的类一样,如同在java和C++中把现有的一个vcl控件
作为一个普通类实现类之间的聚合,合成等各种关系。
这里也就是一个普遍的问题:如何去掉rad功能,直接采用面向对象编程方法实现
各种模式和类之间的各种关联(关联/聚合/合成!),因为vcl控件的事件参数好像
是面向rad的,而不利于直接的编码实现.
顺便请各位谈谈如何在delphi中利用现有的资源,如vcl控件,实现纯粹的面向对象
编程,而不是rad编程。
问题描述:
我想实现两个类的聚合关系。如:
--------------------------
|TMyClass:TObject |
|------------------------ / ----------------------------
|MySocket:TClientSocket |<>-------- |ClientSck:TClientSocket |
|------------------------- / ----------------------------
|各种方法 | |成员和方法 |
------------------------- -----------------------------
那么,也就是 ClientSck作为TMyClass的一个成员,这里我如何引用ClientSck的
OnError,OnRead,OnAccept,OnConnecting方法,好像只见到rad编程中直接双击产生
事件,而我需要在程序中直接引用vcl控件的各种方法,并实现功能扩展。
也就是vcl控件如何像一个普通的类一样,如同在java和C++中把现有的一个vcl控件
作为一个普通类实现类之间的聚合,合成等各种关系。
这里也就是一个普遍的问题:如何去掉rad功能,直接采用面向对象编程方法实现
各种模式和类之间的各种关联(关联/聚合/合成!),因为vcl控件的事件参数好像
是面向rad的,而不利于直接的编码实现.
顺便请各位谈谈如何在delphi中利用现有的资源,如vcl控件,实现纯粹的面向对象
编程,而不是rad编程。