var
  Image1: TImage;  Image1 := TImage.Create(Self);
  with Image1 do
  begin
    Name := 'Image1';
    Parent := Notebook1;
    Left := 80;
    Top := 25;
    Width := 240;
    Height := 180;
    AutoSize := True;
    Picture.LoadFormFile('Your.bmp');
  end;

解决方案 »

  1.   

    如果是其它控件,应该可以。但是你用的好像是Win3.1控件,可能是有些问题。
    建议你使用TPageControl。
      

  2.   

    var
      Image1: TImage;
    begin
      Image1 := TImage.Create(Self);
      with Image1 do
      begin
        Name := 'Image1';
        Parent := Notebook1;
        Left :=intvalue;
        Top := intvalue;
        Width := intvalue;
        Height := intvalue;
        AutoSize := True;
        if opendialog1.execute then
        Picture.LoadFormFile('Your.bmp');
      end;
      

  3.   

    上边的作废
    var
      Image1: TImage;
    begin
      Image1 := TImage.Create(Self);
      with Image1 do
      begin
        Name := 'Image1';
        Parent := Notebook1;
        Left :=intvalue;
        Top := intvalue;
        Width := intvalue;
        Height := intvalue;
        AutoSize := True;
        if opendialog1.execute then
        Picture.LoadFormFile(opendialog1.filename);
      end;
    有可能是你的路径指的不对
      

  4.   

    注意一定要为动态创建的控件指明Parent
    图片载入后用Refresh刷新一下试试。
      

  5.   

    up,注意一定要为动态创建的控件指明Parent
    图片载入后用Refresh刷新一下试试。