Anstelle eines TImage würde ich ein
TPicture verwenden.
TImage ist ein sichtbares Control.
Dagegen ist TPicture eine Kontainerklasse für ein Bitmap, JPeg, GIF oder anderen Bildformates.
Delphi-Quellcode:
type
TAuto = class(TObject)
private
FTempo: Integer;
FBild : TPicture;
public
constructor Create(const path:string);
Destructor Destroy;override;
procedure Gasgeben;
procedure Bremsen;
property Geschwindigkeit: Integer read FTempo;
property Bild: TPicture read FPicture;
end;
constructor TAuto.Create(const path:string);
begin
inherited Create;
FBild := TPicture.Create;
if FileExists(path) then
FBild.LoadFromFile(path);
end;
Destructor Destroy;override;
begin
FPictures.Free;
interited;
end;