keywords:form,property,image,create
image:= TImage.Create(nil);
image.Top := 100;
image.Height := 100;
image.width := 100;
image.Left := 100
image.parent:=form1; //************
image.Visible := true; //如果这三个缺,难怪看不见图
image.stretch := true; //**************
image.Picture.LoadFromFile( 'd:\yourphoto.jpg ');
代码:
看见了吧,至于你想放到什么上,你随便了
至于create函数,还有申请变量,这些都是动态建立的特性。用户要将窗体属性中的属性复制到单元变量中,然后把image控件拖出,此时窗体属性里的多余控件会被消失。