Zitat:
FALLS das klappt, dann nur mit Glück und an jedem ersten Mittwoch des Monats!
Test es doch bitte..
Ich kann Hunderte von Images speichern und alle sind korrekt.
Kannst du gerne glauben.
Und zwar nach jedem Draw..
Delphi-Quellcode:
if FSymmetrical then
begin
GDIP_DrawImageRectI(grWindow, imgSpectrum, round(Sh), 0, round(-Sh), round(Sh * 2 + 1));
GDIP_DrawImageI(grWindow, imgSpectrum, round(Sh), 0);
end else
GDIP_DrawImageI(grWindow, imgSpectrum, 0, 0);
// GDIP_SaveImageToFile(ExtractFilePath(ParamStr(0)) + '\Text.png', imgSpectrum, Ord(QualityModeHigh));
gruss