Da gibt es zu viele fremde Komponenten, die ich nicht finde z.B.: ksLanczosKernel
Also ich habe folgende Möglichkeiten mit folgenden Ergebnissen:
1:
[SIZE="8"]
Delphi-Quellcode:
SrcR := Src.Width;
SrcB := Src.Height;
T := TAffineTransformation.Create;
T.SrcRect := FloatRect(0, 0, SrcR +1, SrcB + 1);
[/SIZE]
2:
[SIZE="8"]
Delphi-Quellcode:
SrcR := Src.Width;
SrcB := Src.Height;
T := TAffineTransformation.Create;
T.SrcRect := FloatRect(0, 0, SrcR, SrcB);
[/SIZE]
3:
Delphi-Quellcode:
[SIZE="8"] SrcR := Src.Width -1;
SrcB := Src.Height -1;
T := TAffineTransformation.Create;
T.SrcRect := FloatRect(0, 0, SrcR, SrcB);[/SIZE]
Das erste Bild war 100x100 Px groß das jetzige ist 101x101 (hat aber keine Auswirkung, habe jede Änderung auch mit 100x100 probiert).
Danke für die Hilfe, vllt könnte nochmal jemand sich diesem Problem annehmen.
MfG schlagzu