Stretch soll nicht für Canvas gelten!

[maximi]

Hallo!
Wenn ich ein Bild stretche und darauf einen Text mit Canvas schreibe verzerrt mein Text auch. Mein Text soll aber nicht verzerrt aussehen.

Danke

[maximi]

Kann man das regeln?

[toms]

Code...?

[maximi]

Delphi-Quellcode:

  Image1.stretch := true;
  Image1.canvas.Brush.Style := bsclear;
  Image1.Canvas.TextOut(0, 0, caption);

Der mit Canvas geschriebene Text wird mitgestretcht.

[FriFra]

Dann setze die Eigenschaft Stretched auf False! Du kannst das Bild ja mit StretchDraw selber stretchen und dann wird Dein Text auch nicht gestretcht ...

[maximi]

Irgendwie hab ich mit strtchdraw ein Problem mit den Parametern.
was soll ich bei rect:Trect eingeben?

[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!

[maximi]

Kann mir keiner helfen??