<![CDATA[Grafiken besser skalieren (resample)?]]>Hi,

ich bin gerade dabei ein Programm zu schreiben, welches Bilder kleiner skalieren soll.

Ich habe hierfür die Vorlage aus der FAQ genommen, doch das Ergebnis ist leider nicht so der bringer im Vergleich mit anderen Alternativen wie einen Grafikprogramm oder PHP (Funktion imageCopyResampled()).

Hier erstmal mein derzeit verwendeter Code:

TRect ARect;
Graphics::TBitmap *bmp = new Graphics::TBitmap();
TJPEGImage *jpg = new TJPEGImage();

jpg->LoadFromFile("D:\\test.jpg");

// gewünschte neue Abmessungen festlegen
bmp->Width = 520;
bmp->Height = 347;

// Rect mit den gleichen Abmessungen definieren und das per
// StretchDraw vergrösserte JPEG auf das Bitmap zeichnen
ARect = Rect(0, 0, 520, 347);
bmp->Canvas->StretchDraw(ARect, jpg);

// Inhalt des Bitmap auf das JPEG übertragen, speichern
jpg->Assign(bmp);
jpg->ProgressiveEncoding = true ;
jpg->ProgressiveDisplay = true ;
jpg->Smoothing = true ;
jpg->CompressionQuality = 100 ;
jpg->SaveToFile("d:\\test2.jpg");

delete jpg;
delete bmp;

Wäre toll, wenn einer von Euch eine Alternative kennen würde.

Das Ausgangsbild hat eine Auflösung von 3888x2592 Pixeln.

Viele Grüße
Heinz

]]>https://www.c-plusplus.net/forum/topic/173696/grafiken-besser-skalieren-resampleRSS for NodeFri, 14 Aug 2026 15:51:58 GMTSun, 18 Feb 2007 23:23:12 GMT60<![CDATA[Reply to Grafiken besser skalieren (resample)? on Sun, 18 Feb 2007 23:23:12 GMT]]>Hi,

ich bin gerade dabei ein Programm zu schreiben, welches Bilder kleiner skalieren soll.

Ich habe hierfür die Vorlage aus der FAQ genommen, doch das Ergebnis ist leider nicht so der bringer im Vergleich mit anderen Alternativen wie einen Grafikprogramm oder PHP (Funktion imageCopyResampled()).

Hier erstmal mein derzeit verwendeter Code:

TRect ARect;
Graphics::TBitmap *bmp = new Graphics::TBitmap();
TJPEGImage *jpg = new TJPEGImage();

jpg->LoadFromFile("D:\\test.jpg");

// gewünschte neue Abmessungen festlegen
bmp->Width = 520;
bmp->Height = 347;

// Rect mit den gleichen Abmessungen definieren und das per
// StretchDraw vergrösserte JPEG auf das Bitmap zeichnen
ARect = Rect(0, 0, 520, 347);
bmp->Canvas->StretchDraw(ARect, jpg);

// Inhalt des Bitmap auf das JPEG übertragen, speichern
jpg->Assign(bmp);
jpg->ProgressiveEncoding = true ;
jpg->ProgressiveDisplay = true ;
jpg->Smoothing = true ;
jpg->CompressionQuality = 100 ;
jpg->SaveToFile("d:\\test2.jpg");

delete jpg;
delete bmp;

Wäre toll, wenn einer von Euch eine Alternative kennen würde.

Das Ausgangsbild hat eine Auflösung von 3888x2592 Pixeln.

Viele Grüße
Heinz

]]>https://www.c-plusplus.net/forum/post/1230847https://www.c-plusplus.net/forum/post/1230847Sun, 18 Feb 2007 23:23:12 GMT<![CDATA[Reply to Grafiken besser skalieren (resample)? on Wed, 21 Feb 2007 10:54:28 GMT]]>das was du erreichen willst, ist schon etwas komplizierter. einfaches runterskalieren ohne die pixelfarben anzufassen, liefert halt nur schlechte ergebnisse. um bessere qualität zu erreichen, musst du die neuen pixelwerte aus den alten werten interpolieren.

z.b. mittels einem Lanczos-Filter: http://en.wikipedia.org/wiki/Lanczos_resampling
ein paar Info und Ergebenisse von Filtern: http://www.mediachance.com/pbrush/help/resize.html
Pascal-Code zum Resamplen (ziemlich viel, musste mal schauen)
http://fantasy.myserver.org/trac/kicoy/browser/trunk/lib/kol/KOLGraphicEx.pas?rev=17&format=txt

]]>https://www.c-plusplus.net/forum/post/1232472https://www.c-plusplus.net/forum/post/1232472Wed, 21 Feb 2007 10:54:28 GMT<![CDATA[Reply to Grafiken besser skalieren (resample)? on Wed, 21 Feb 2007 13:03:14 GMT]]>Hallo

GDI+ kann auch in verschiedenen Qualitätsstufen Bilder skalieren. Vielleicht ist da die Qualität besser ?!?

Pronto451

]]>https://www.c-plusplus.net/forum/post/1232581https://www.c-plusplus.net/forum/post/1232581Wed, 21 Feb 2007 13:03:14 GMT