What I did was re-assign the bitmap that was passed as the incoming function
paramter.
eg
function Tcamform.SizeFunc(BMap: Tbitmap): Tbitmap;
var
  BMPtmp, BMPtmpB: TFastBMP;
  wsize, hsize: word;
  fval1, fval2: single;
begin
//other code here
 BMPtmpB := TfastBMP.CreateFromhBmp(BMap.handle);
  BMPtmp := TfastBMP.Create(wsize, hsize);
    BMap.Width := wsize;
    BMap.Height := hsize;
    BMPtmpB.SmoothResize(BMPtmp);
    BMPtmp.Draw(bmap.canvas.handle, 0, 0);
    result :=bmap;
//Is that clean and tidy enuff?

 That works, but from my days of C which I have forgotten the '*' operator
was 'the contents of' a pointer.
So in C (maybe Im wrong) this was probably OK:
result:=*BmpTEMP;
BmpTEMP.free;


---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to