Stretch soll nicht für Canvas gelten!

[maximi]

Also das ist mein Code:

Delphi-Quellcode:

var r:tRect;
begin
  imagelist.GetBitmap(index,Picture.Bitmap);
  r.Left := left;
  r.Right := right;
  r.Top := top;
  r.Bottom := top+height;
  canvas.StretchDraw(r,picture.Bitmap);
  canvas.Brush.Style := bsclear;
  Canvas.TextOut(0, 0, caption);
end;

Das klappt aber irgednwie noch nicht so ganz!