TPicture.assing(TJPEGImage)

[Sko]

Delphi-Quellcode:

procedure foo;
var
  Pic: TPicture;
begin
  pic := TPicture.Create;
  try
    pic.LoadFromFile('C:\foo.jpg');
    {tu irgendwas}
  finally
    pic.free;
  end;
end;

...sollte eigentlich problemlos klappen, vorausgesetzt du hast die Unit JPEG eingebunden, das Assign kannst du dir dann sparen.

[Edit]

Zitat von Mooshead:

...Also wenn ich aus TJPEGImage TPicture mache dann kann ich die Bilder genauso laden und ohne umwandlung darstellen?

Wenn du ein Image oder so auf der Form hast ist das noch einfacher: Image1.Picture.LoadFromFile('Bla.jpg');
[/Edit]