Wie sieht denn dein aktueller Code aus? Du müsstest ja nun eine zweite TRect Variable haben. Und wenn du den Ausschnitt im Ziel direkt links oben haben möchtest, sieht das für einen 50x100 Pixel großen Ausschnitt z.B. so aus:
Delphi-Quellcode:
var
TargetRect: TRect;
begin
TargetRect := Rect(0, 0, 50, 100);
...
Bild.Canvas.CopyRect(TargetRect, c, r);