jpg in TImage

[ahachmann]

Ich bin grad selber ein wenig am fummel ein JPG in Image zu bekommen.
Naja, und leider kann ich mit dem oben genanten Code nur die Exception "TJPEGImage cannot be assigned to TImage" rufen.
:-0
der code:

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
  var jpg: TJPEGImage;
begin
  if OpenPictureDialog1.Execute then
  begin
    jpg := TJPEGImage.Create;
    jpg.LoadFromFile(OpenPictureDialog1.FileName);
    image1.Width := jpg.Width;
    image1.Height := jpg.Height;
    image1.Assign(jpg);
  end;
end;

Mache ich was falsch? Habe Delphi 6
Gruß,
Alexander