Delphi-PRAXiS - Canvas Zeichenfläche erkennen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Canvas Zeichenfläche erkennen (https://www.delphipraxis.net/169509-canvas-zeichenflaeche-erkennen.html)

Dan2012

25. Jul 2012 12:39

Delphi-Version: 7

Canvas Zeichenfläche erkennen

Hallo,

kann man mit Canvas erkennen, ob an einer Stelle etwas geschrieben wurde, oder nicht.

Zur Erklärung:
Ich habe verschiedene Bilder über Canvas erstellt.
Nun möchte ich im Nachhinein gerne den oberen und unteren weißen Rand abtrennen, sodass nur noch der verwendete Bereich übrig bleibt.

Ist das mit Canvas möglich?

Jonas Shinaniganz

25. Jul 2012 13:08

AW: Canvas Zeichenfläche erkennen

Hi, ein bisschen Code ist immer hilfreich. Wie hast du denn die Bilder erstellt? mit canvas.draw?
Oder lädst du zb bmp's auf die Canvas? Meinst du die Canvas des Formulars oder eine TBitmap.Canvas?

Du kannst dir dein Canvas ableiten und "mitloggen" ob nie über oder unter einem Bereich gemalt wurde falls du deine Canvas mit draw Befehler bemalst und dann zum Schluss abschneiden / ein Rect welches nur den bemalten Bereich hat rauskopieren. :?:

ConnorMcLeod

25. Jul 2012 13:28

AW: Canvas Zeichenfläche erkennen

Mittels

Delphi-Quellcode:

Canvas.Pixels[x, y] = clWhite

alle Zeilen prüfen, bis eine Zeile gefunden wird, bei der es nicht übereinstimmt, oder?

Alle Zeitangaben in WEZ +1. Es ist jetzt 09:03 Uhr.