Einzelnen Beitrag anzeigen

bernhard_LA

Registriert seit: 8. Jun 2009
Ort: Bayern
1.124 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: Bitmap shrinken

  Alt 8. Jan 2013, 12:39
um die Box zu zentrieren würde ich folgende LÖsung verwenden

Delphi-Quellcode:
          ScanImageBox.Left := trunc(Out_X-1 * ScaleF/2);
          ScanImageBox.Top := trunc(Out_Y-1 * ScaleF/2);
          ScanImageBox.Right := trunc((Out_X + 1) * ScaleF/2);
          ScanImageBox.Bottom := trunc((Out_Y + 1) * ScaleF/2);
un solange die Box nicht im Scan Bereich der Ursprungbildes liegt abbrechen ?
  Mit Zitat antworten Zitat