Zitat von
mattsbg:
T.SrcRect := FloatRect(0, 0, SrcR + 1, SrcB + 1);
Mach aus den "+" einfach mal ein "-". Im Moment rutscht du 2 Pixel weit recht und unten über den Bereich hinaus, was das Drehzentrum um einen Pixel nach rechts/unten verschiebt, und dadurch kommst du auf deinen Rand oben und links.
Anm.: Der unterste rechte Pixel ist immer [Width-1; Height-1]. Der Klassiker bei 0-basierten Arrays trifft auch den Bildkünstler. Hier sogar doppelt stark.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)