请问怎么动态创建image啊

Question

请问怎么动态创建image啊

Answer 1

a:timage;
begin
a:=timage.create();
....

Answer 2

定义:
  TmpImage: TImage;实现:
  tmpimage := TImage.Create(Self);
  with tmpImage do
  begin
    Parent := self;
    left := ...
    top := ...
    width := ...
    height := ...
  end;解释:  self 为tmpImage的父类

Answer 3

哦
知道了要加一个tpanpanel

Answer 4

你要设置picture属性或是在Image上画条直线或是给Image上个色什么的，要不Image是空的怎么显示阿？

Answer 5

Image.Picture.LoadFromFile('图片文件名')

Answer 6

创建后，用LoadFromFile读取图片。

Answer 7

要设置好上面的Parent
如果创建的image的父对象是Form1,则
image.Parent:=Form1;
这样才会在Form1中显示出来.

Answer 8

var
  TmpImage: TImage;
begin
  tmpimage := TImage.Create(Self);
  with tmpImage do
  begin
    Parent := self;
    left := ...
    top := ...
    width := ...
    height := ...
    picture.bitmap.LoadFromFile('位图文件名');
  end;
end;