Eso se debe a que un TImage.Picture sólo tiene un TBitmap si contiene una imagen BMP (es decir, un bitmap
![Wink](http://www.clubdelphi.com/foros/images/smilies/wink.gif)
).
Cuando la imagen es de otro tipo, el objeto bitmap no tiene nada adentro.
Lo que podrías hacer, antes de llamar a la rutina en cuestión, es convertir a bitmap. Lógicamente dejás de tener un jpg para pasar a tener un bitmap.
Código Delphi
[-]
procedure TForm1.Image2Click(Sender: TObject);
var Bmp: TBitmap;
begin
Bmp:= TBitmap.Create;
Bmp.Assign(image1.Picture.Graphic);
Antialiasing(Bmp, Image2.Picture.Bitmap);
Bmp.Free;
end;
¿Se entiende?
Saludongos.