这种情况怎么释放对象？(50分)

function Jpg2Bmp(Jpg: TJpegImage): TBitmap

begin
Result := nil

if Assigned(Jpg)
then begin
Result := TBitmap.Create

Jpg.DIBNeeded
{Key method...}
Result.Assign(Jpg)
{Its all folks...}
end

end



这是一个JPG转BMP的函数，请问再外部使用了这个函数后，怎么释放掉RESULT这个BMP对象？

在这个过程中不需要释放BMP对象的。
如果你在外部使用了这个函数，例：A:=Jpg2Bmp(B)
以后只要释放A就行了。B在函数后就可释放。

with Jpg2Bmp(a) do
begin
......
free;
end;

多人接受答案了。