Bilder "erweitern"

[Thomas]

Hallo,

ich stehe vor folgenden Problem:

Ich habe einige Tausend Bilder (JPG und BMP) in den unterschiedlichsten Abmessungen. Diese sollen jetzt alle auf 640 mal 480 Pixel angepasst werden. Ich weiss, wie ich die Bilder so verkleinere, daß sie maximal 640 Pixel breit bzw. maximal 480 Pixel hoch sind. Dazu errechne ich aus den Original-Abmessungen _jpg.Height und _jpg.Width die neuen Abmessungen _bmp.Height und _bmp.Width, wobei ich das Seitenverhältnis beibehalte:

        _bmp.Canvas.StretchDraw(RECT(0,0,_bmp.Width,_bmp.Height),_jpg);

Nun mein Problem: Nach der Umwandlung ist die neue Breite unter 640 Pixel bzw. die neue Höhe unter 480 Pixel. Die fehlenden Pixel sollen durch schwarze Reihen bzw. Spalten an den entsprechenden Seiten ergänzt werden.

Hat hier einer von Euch eine Lösung?

Gruß aus Köln
Thomas

[Jailbird]

Ja...Erst das neue Bitmap "schwarz" vollzeichnen (FillRectangle) und danach das eigentliche Bitmap gestrecht drüber zeichnen.

[Thomas]

Danke für den Tipp. Funktioniert prima - nur nicht gestrecht.

Gruß
Thomas