关于制作控件的问题，望高手赐教。（100分）(100分)

M

milan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-06

• #1

要制作一个组件，既有tbutton类的属性和方法，又有tshape类的属性和方法，
应如何继承？delphi好象只能继承一个父类。
如一个组件是由n个同一组件构成，要制作这样一个组件又应如何继承？
最好能有代码。谢谢！！

 

D

duancy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-06

• #2

我也想自己制作控件，现在还不能帮你。

 

J

JohnsonGuo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-06

• #3

一般来说，如果在Delphi中要同时继承两个类是不可能的（不过Delphi提供来解决方法，
就是使用接口）。
如果具体到你这个问题，可以这样解决，从TButton类继承一个类（如：TMyButton)，
在类内部创建一个TShape对象，把TShape.Canvas.Handle设为你TMyButton的设备环境
句柄(hDC)，应该可以解决问题。

 

M

milan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-07

• #4

谢谢JohnsonGuo，能给出具体的代码吗？
顺便再请教一下，如果在制作的组件里面有两个或两个 以上的对象生成时，
应如何调整各个对象之间的相对位置呢？

 

M

milan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-12

• #5

多人接受答案了。