![]() |
AW: Zwei übereinander liegende Bilddateien trennen !!!
App nennt sich einfach QR von tapmedia
|
AW: Zwei übereinander liegende Bilddateien trennen !!!
Oder kannst Du mir einen Bildschirmdruck von der ausgelesenen Datei hier reinstellen bitte?
Das würde mir wirklich weiterhelfen. |
AW: Zwei übereinander liegende Bilddateien trennen !!!
Liste der Anhänge anzeigen (Anzahl: 1)
Hatte jetzt nochmal beide Fotos in eine RAR-Datei gepackt.
|
AW: Zwei übereinander liegende Bilddateien trennen !!!
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:
|
AW: Zwei übereinander liegende Bilddateien trennen !!!
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:
Den Hinweis das Du das Originalbild vom Bild mit QR-Code abziehen kannst haben dir ja schon mehrere gegeben. Prinzipiell ist das schon mal der richtige Ansatz. Mit den unterschiedlichen Größen von Referenzbild und Abbildung kannst Du auf verschiedene Arten umgehen, um nicht mit der Bazooka loszumarschieren [1] kannst Du Dir eine einfache Form von Bildregistrierung selbst basteln : Wenn die Bilder sich nur in der Größe unterscheiden dann kannst Du eines der Bilder natürlich einfach skalieren. Da die Seitenverhältnisse bei beiden Bildern gleich sein müssten dürfte eine Skalierung eine relativ gute Abbildung ergeben. Alternativ dazu kannst Du natürlich auch ohne Skalierung auskommen und einfach die Koordinaten umrechnen um für jeden Punkt (X,Y) im Bild 1 einen Punkt(X,Y) im Bild 2 zu bekommen. Ist das Bild darüber hinaus verzerrt dann musst Du Dir drei oder vier Stützpunkte suchen die in beiden Bildern an der gleichen Position vorkommen. Diese Stützpunkte kannst Du mittels Template-Matching in beiden Bildern suchen (dazu kannst Du beispielsweise OpenCV verwenden) und wendest anschließend eine bilineare Interpolation auf das zu transformierende Bild an. ( ![]() 1. Anschließend gehst Du den bereits vorgeschlagenen Weg und erstellst Die eine SW - Maske die die gleichen Ausmaße wie Deine Bilder hat. An der Stelle an der der sich das Abbild vom Original unterscheidet setzt Du einen schwaren Punkt. Die weißen Quadrate des QR-Codes kannst Du auf diese Art zunächst nicht finden, denn Dein Bild sieht so aus als ob Weiß den Farbwert der Abbildung nicht beeinflusst, aber das dürfte keine Rolle spielen. Wenn Du Glück hast, dann war es das. Du müstest Dir nur noch die Bounding-Box Deiner Maske suchen (als das minimale Quadrat das alle schwarzen Pixel einschließt) um diesen Bereich zu kopieren und du hättest Deinen QR-Code gefunden. Die meisten der hier genannten und notwendigen Verfahren, einschließlich bilinearer Interpolation und logischen oder arithmetischen Operationen auf Bildern (Bilder mit OR,UND,SUB usw. bearbeiten) sind übrigens in Leptonica ( ![]() Ich habe mir erlaubt eine selbst compilierte DLL und eine unvollständig getestete Headerübersetzung anzuhängen. Möglicherweise kannst Du ja was damit anfangen. Wenn etwas nicht funktioniert ist anstelle eines var XXX eine pXXX als Parameter verlangt (oder umgekehrt). Leptonica steht unter der BSD Lizenz. In Anbetracht des Umfangs bitte ich zu verzeihen das ich nur die Funktionen getestet habe die ich selbst verwende. [1] ![]() Numerical Methods for Image Registration, ISBN 978-0-19-852841-8 2-D and 3-D Image Registration, ISBN 978-0-471-64952-0 |
AW: Zwei übereinander liegende Bilddateien trennen !!!
Geht auch mit geringfügig weniger Zeilen:
Delphi-Quellcode:
function GetNewPicFromDifferences (OrgPic, NewPic, BDif: TBitmap): Boolean;
begin BDif.Assign(OrgPic); result := BitBlt(BDif.Canvas.Handle, 0, 0, BDif.Width, BDif.Height, NewPic.Canvas.Handle, 0, 0, SRCINVERT); if result then begin BDif.Mask(clBlack); end; end; |
AW: Zwei übereinander liegende Bilddateien trennen !!!
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:
Zum Beispiel hat das erste Pixel einmal 224,225,193 und im anderen Bild 231,231,180. Selbst wenn man jetzt eine Toleranz-Option einbaut
Delphi-Quellcode:
kommt man leider nur zu unbefriedigenden Ergebnissen, siehe Screenshot (hier mit Wert "5").
w1 := (Byte (LineOrg[x][0]) + Byte (LineOrg[x][1]) + Byte (LineOrg[x][2])) Div 3;
w2 := (Byte (LineNew[x][0]) + Byte (LineNew[x][1]) + Byte (LineNew[x][2])) Div 3; dif := Abs (w2-w1); if (dif > Tolerance) then begin |
AW: Zwei übereinander liegende Bilddateien trennen !!!
Zitat:
|
AW: Zwei übereinander liegende Bilddateien trennen !!!
Leute, Ihr habt schon viel zu viel für mich getan. Ich werde den QR mal meinem Rätselsteller mitteilen und schauen, was der sagt.
Ich bin morgen wieder hier und gebe gerade Meldung, ob das gepasst hat. Vielen Dank an Euch :) Gruß Oliver |
AW: Zwei übereinander liegende Bilddateien trennen !!!
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:
![]() Das ist eigentlich schon recht gut. Da dieser Code durch Quadrate gebildet wird, könnte man versuchen die Länge/Breite eines der Quadrate zu ermitteln, das Bild in entsprechende Quadrate/Zellen unterteilen, für jede Zelle prüfen ob mehr als 50 % Pixel gesetzt sind. Ist das der Fall dann wird das Quadrat ausgefüllt, ist das nicht der Fall dann wird das Quadrat nicht ausgefüllt. Das dürfte dann noch nicht perfekt sein aber doch schon sehr gut. cu Ha-Jö |
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:43 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz