procedure TForm1.FormCreate(Sender: TObject);
var jpg:TJPEGImage;
begin
  jpg:=TJPEGImage.Create;
  jpg.LoadFromFile('d:\Apathy.jpg');
  Image1.Picture.Bitmap.Assign(jpg);
  jpg.Free;
end;