W
whsuperboy
Unregistered / Unconfirmed
GUEST, unregistred user!
问题1。
我先在窗体上放几个label,然后在声明部分写:
type Tmylabel=class(tlabel)
public
mystring:string;
end;
然后把代码中的label1:Tlabel,label2:tlabel都改成label1:Tmylabel,label2:Tmylabel。
编译时出错,说"label1应该声明成Tlabel但却声明成Tmylabel,是否更正?"。请问怎样才能
在把Tlabel变成Tmylabel。(不想改tlabel源码,因为同样的情况,有的控件没有源码)
是不是只有把Tmylabel做成vcl放在delphi控件面板上才行?能不能在程序unit里面简单的变换?
问题2.
我做好了一个Tform1,我想把其他的form都继承Tform1,方便编程。就是
Tform2=class(Tmyform1),我这样手工改了之后,编译没有问题,但是设计状态下,在
form2上看不到Tform1上的控件,不好修改,如何才能看到Tform1上的控件?或者如何才是
正确的做法?
我先在窗体上放几个label,然后在声明部分写:
type Tmylabel=class(tlabel)
public
mystring:string;
end;
然后把代码中的label1:Tlabel,label2:tlabel都改成label1:Tmylabel,label2:Tmylabel。
编译时出错,说"label1应该声明成Tlabel但却声明成Tmylabel,是否更正?"。请问怎样才能
在把Tlabel变成Tmylabel。(不想改tlabel源码,因为同样的情况,有的控件没有源码)
是不是只有把Tmylabel做成vcl放在delphi控件面板上才行?能不能在程序unit里面简单的变换?
问题2.
我做好了一个Tform1,我想把其他的form都继承Tform1,方便编程。就是
Tform2=class(Tmyform1),我这样手工改了之后,编译没有问题,但是设计状态下,在
form2上看不到Tform1上的控件,不好修改,如何才能看到Tform1上的控件?或者如何才是
正确的做法?