Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#19

AW: Resample oder Resize mit GDI+

  Alt 30. Nov 2010, 10:51
@Eweiss

Hi,

Ich hatte Ihn so verstanden daß er ein bestehenden GraphicObject direkt skalieren will ohne Umweg über ein File.

Ich habe mal eine Prozedur:
Delphi-Quellcode:
function DrawImageFromGraphic(source:TGraphic;
  DrawHdc: HDC;
  Percent: Integer;
  Interpolation: InterpolationMode = InterpolationModeDefault;
  Smoothing : SmoothingMode = SmoothingModeNone;
  PixelOffset : PixelOffsetMode = PixelOffsetModeNone;
  CompositingQuality: CompositingQualityMode = CompositingQualityDefault;
  CompositingMode: CompositingModeMode = CompositingModeSourceOver): Boolean;
in Deinen Code mit eingebaut, erfordert allerdings Classes,ActiveX wg.

function GdipLoadImageFromStreamICM(stream: ISTREAM;
out image: Cardinal): Integer; stdcall;
{$EXTERNALSYM GdipLoadImageFromStreamICM}

ist nur eine Quickhack, Du darfst falls Du es brauchen kannst das ganze gern optimieren.
Angehängte Dateien
Dateityp: zip Stretch.zip (61,8 KB, 39x aufgerufen)
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat