Einzelnen Beitrag anzeigen

Benutzerbild von Flocke
Flocke

Registriert seit: 9. Jun 2005
Ort: Unna
1.172 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#4

Re: JPEG resizen und nur Probleme

  Alt 15. Jul 2005, 12:52
Zitat von alcaeus:
Die groesse passt, aber die Farben usw. passen ueberhaupt nicht. Es sieht so aus als waere ein Raster druebergezogen worden. Mit StretchDraw klappt es hingegen.
Hast du mal das ausprobiert für StretchBlt:
Delphi-Quellcode:
with PaintBoxList[1][iIndex].Canvas do
begin
  GetBrushOrgEx(Handle, pt);
  SetStretchBltMode(Handle, HALFTONE);
  SetBrushOrgEx(Handle, pt.x, pt.y, @pt);
  StretchBlt(Handle, PicLeft, PicTop, NewWidth, NewHeight,
             TempBMP.Canvas.Handle, 0, 0, OldWidth, OldHeight, SRCCOPY);
end;
Volker
  Mit Zitat antworten Zitat