L lqquan34168 Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-29 #1 class of TForm 和class(TForm)有什么区别呢? 如何让Edit1具有RichEdit1那样的拖拽功能呢?
D duhai_lee Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-29 #2 class of TForm 声明的是类类型, 如 cf = class of tform f: cf // f就是一个Tform类。 class(TForm) 是声明一个类, 这个类继承了Tform类。 如: tform1 = class(tform) f: Tform1 //f是一个TForm的对象,是一个具体的窗体对象。 edit是可以做到拖拽, 但是它的内容是不可以, 如果非要做。只能是做成假的。
class of TForm 声明的是类类型, 如 cf = class of tform f: cf // f就是一个Tform类。 class(TForm) 是声明一个类, 这个类继承了Tform类。 如: tform1 = class(tform) f: Tform1 //f是一个TForm的对象,是一个具体的窗体对象。 edit是可以做到拖拽, 但是它的内容是不可以, 如果非要做。只能是做成假的。