我想在窗体中动态生成并显示1个TImage,但没有成功!在Form1的Create中加入一下代码:
begin
Image1:=TImage.Create(self);
:
//设置Image1的属性;
:
form1.update;
end;这段代码能够通过编译,但没有我想要的结果!!!!!
begin
Image1:=TImage.Create(self);
:
//设置Image1的属性;
:
form1.update;
end;这段代码能够通过编译,但没有我想要的结果!!!!!
Image1.top := 10;
Image1.left := 10;
Image1.Width := 100;
Image1.Henght := 50;
Image1.Parent := Form1;
Image1.Visible := True;
Image1:=TImage.Create(self);
image1.parent:=self;
:
//设置Image1的属性;
:
end;
MyB: TEdit;
begin
MyB:=TEdit.Create(Self);
MyB.Parent:=Form1;
MyB.Left:=20;
MyB.Top:=10;
MyB.OnClick:=MyOnClick;//MyOnClick 响应事件的过程
MyB.Show;
end;
使用完毕后,释放分配的资源
if Assigned(Edit1) then Edit1.Free;
可惜,对于动态创建问题,关键两点:
1。设置parent属性
2。释放内存(但是这儿我现在都还是不明白)