Thema: Delphi Bitmap Ränder entfernen

Einzelnen Beitrag anzeigen

Christian18

Registriert seit: 9. Dez 2003
Ort: Hamburg
1.279 Beiträge
 
#5

Re: Bitmap Ränder entfernen

  Alt 14. Aug 2007, 21:56
Hallo,

irgendwie klappt das alles nicht wie ich will. links und oben schneidet er es jetzt ab, aber unten und rechts noch nicht. hat jemand mal ein beispiel???

Delphi-Quellcode:
Bitmap.Width := Screen.DesktopWidth - (VLeft + VRight);
Bitmap.Height:= Screen.DesktopHeight - (VTop + VBottom);
Bitmap.Canvas.CopyRect(Rect(0 - VLeft, 0 - VTop, Bitmap.Width - VLeft + VRight, Bitmap.Height - VTop + VBottom), Canvas, Screen.DesktopRect);
  Mit Zitat antworten Zitat