Testcode:
Code: Alles auswählen
#Source = 1
#Dest = 2
#FileSource = "c:\testbild.bmp"
#FileDest = "c:\testbild_neu.bmp"
LoadImage(#Source, #FileSource)
StartDrawing(ImageOutput(#Source))
Debug "Farbe oben links 1: " + Str(Point(1,1))
StopDrawing()
GrabImage(#Source, #Dest, 0, 0, ImageWidth(1), ImageHeight(1))
StartDrawing(ImageOutput(#Dest))
Debug "Farbe oben links 2: " + Str(Point(1,1))
StopDrawing()
SaveImage(#Dest, #FileDest, #PB_ImagePlugin_BMP)
End
Ist c:\testbild.bmp ein truecolor BMP Bild, dann ist alles ok.
Ist c:\testbild.bmp ein 1 Bit Schwarz/Weiss BMP Bild, dann ist weiss nicht mehr weiss!
Manchmal ist Weiss zu einem Grün geworden, manchmal auch zu Cyan.
Die fehlerhafte Routine ist die GrabImage() Routine (wie die Point() Ergebnisse zeigen)!
Benötige dringend einen Workaround!!!!!
Volker