Student = Record
    FirstName, LastName: string[20];
    PhoneNumber: string[15];
    PostCode: Integer;
    Birthday: TDate;
    Image :TImage;
  end;
var
 begin
  Student.Image.LoadFromFile()
 end;

解决方案 »

  1.   

    student.Image:=TImage.Create;
    student.Image.LoadFromFile('YourImageFile.bmp');别忘了用完后要student.Image.Free;
      

  2.   

    student.Image:=TImage.Create;
    student.Image.LoadFromFile('YourImageFile.bmp');别忘了用完后要student.Image.Free;
      

  3.   

    TImage.Create(##)
    ##里面应该用什么参数;
      

  4.   

    var
     P:Student;
    begin
    new(P);
    P.imageImage:=TImage.Create;
    p.Image.LoadFromFile('YourImageFile.bmp');
      

  5.   

    Timage.Create(nil) ;timage.create(self)都可以,
      

  6.   

    Create方法要求提供该对象的所有者(Owner),你可以用Self,也可以用Nil
      

  7.   

    也可以这样
    var
      Img: TImage;
    begin
      Img := TImage.Create;
      student.Image := Img;
    end;