实现内容:
constructor TCS_ExNumEdit_ID.Create(AOWner: Tcomponent);
begin
inherited; FEdit_MC:=TEdit.Create(nil);
FEdit_MC.Width:=180;
FEdit_MC.Height:=27;
FEdit_MC.Top:=Self.Top;
FEdit_MC.Parent:=Screen.ActiveForm;
FEdit_MC.Visible:=True;end;
实现目标:
我想在TCS_ExNumEdit_ID类创建同时创建一个Edit同时显示在窗体上
问题:
显示在窗体上的Edit框不能像正常控件那样进行移动,属性设置
如何解决这种现象? 让edit像在窗体上直接添加的一样
constructor TCS_ExNumEdit_ID.Create(AOWner: Tcomponent);
begin
inherited; FEdit_MC:=TEdit.Create(nil);
FEdit_MC.Width:=180;
FEdit_MC.Height:=27;
FEdit_MC.Top:=Self.Top;
FEdit_MC.Parent:=Screen.ActiveForm;
FEdit_MC.Visible:=True;end;
实现目标:
我想在TCS_ExNumEdit_ID类创建同时创建一个Edit同时显示在窗体上
问题:
显示在窗体上的Edit框不能像正常控件那样进行移动,属性设置
如何解决这种现象? 让edit像在窗体上直接添加的一样
-----------
想要怎么移动?动态添加的控件在IDE 环境就看不到呀,在说 edit 也不能在运行时候移动嘎。 不太明白。
比如你添加一个edit,一个combobox,不是要找到两个分别加吗,我想通过一个类来实现一起加了!
var
FEdit_MC :TEdit;
begin
inherited; FEdit_MC:=TEdit.Create(nil);
FEdit_MC.Width:=180;
FEdit_MC.Height:=27;
FEdit_MC.Top:=Self.Top;
FEdit_MC.Parent:=Screen.ActiveForm;
FEdit_MC.Visible:=True;end;