Kaeru Gaman hat geschrieben:kann man damit auch nachvertonen?
So sieht das ganze Resizen bei mir aus:
Code: Alles auswählen
Procedure ResizeImageInMemory(*Buffer1, *Buffer2, *bih1.BITMAPINFOHEADER, *bih2.BITMAPINFOHEADER, Smooth.l)
Protected image.l
Protected hDC.l
image = CreateImage(#PB_Any, *bih1\biWidth, *bih1\biHeight)
hDC = StartDrawing(ImageOutput(image))
SetDIBits_(hDC, ImageID(image), 0, *bih1\biHeight, *Buffer1, *bih1, #DIB_RGB_COLORS)
StopDrawing()
If Smooth = 0
ResizeImage(image, *bih2\biWidth, *bih2\biHeight, #PB_Image_Raw)
Else
ResizeImage(image, *bih2\biWidth, *bih2\biHeight, #PB_Image_Smooth)
EndIf
hDC = StartDrawing(ImageOutput(image))
GetDIBits_(hDC, ImageID(image), 0, *bih2\biHeight, *Buffer2, *bih2, #DIB_RGB_COLORS)
StopDrawing()
FreeImage(image)
EndProcedure
Wenn du mir so eine ähnliche Prozedur hast - natürlich für deinen Anwendungszweck - dann mache ich dir ein eigenes Tool dafür.
Vielleicht noch eine kleine Beschreibung dazu.
[EDIT]
Ah du meinst Ton nachträglich einfügen (Ich dachte an Nachvertonen im Farblichen Sinne) - Nein das geht nicht.