Zwei Texte wortweise vergleichen + Unterschiede markieren

[TigerLilly]

Ich würde gern zwei Texte wortweise vergleichen und due Unterschiede markieren. Also so ähnlich, wie das Word auch macht.

Das ist Text A.
Das könnte Text B sein.

Kennt da jemand etwas?

[bernau]

Zitat:

Zitat von TigerLilly (Beitrag 1488152)

Ich würde gern zwei Texte wortweise vergleichen und due Unterschiede markieren. Also so ähnlich, wie das Word auch macht.

Das ist Text A.
Das könnte Text B sein.

Kennt da jemand etwas?

Vielleicht noch etwas präzisieren.

a) Das könnte vielleicht Text B sein.

b) Das könnte vielleicht Text B sein.

Was davon wäre richtig?

[KodeZwerg]

Zitat:

Zitat von TigerLilly (Beitrag 1488152)

Also so ähnlich, wie das Word auch macht.

Wenn es Word kann, benutze doch ein Word COM-Objekt um das zu erreichen.

[bernau]

Zitat:

Zitat von KodeZwerg (Beitrag 1488154)

Zitat:

Zitat von TigerLilly (Beitrag 1488152)

Also so ähnlich, wie das Word auch macht.

Wenn es Word kann, benutze doch ein Word COM-Objekt um das zu erreichen.

Kanonenkugel auf Spatzen? ;-)

[TigerLilly]

Zitat:

Zitat von bernau (Beitrag 1488153)

Zitat:

Zitat von TigerLilly (Beitrag 1488152)

Ich würde gern zwei Texte wortweise vergleichen und due Unterschiede markieren. Also so ähnlich, wie das Word auch macht.

Das ist Text A.
Das könnte Text B sein.

Kennt da jemand etwas?

Vielleicht noch etwas präzisieren.

a) Das könnte vielleicht Text B sein.

b) Das könnte vielleicht Text B sein.

Was davon wäre richtig?

a) wäre richtig. "Text" kommt in beiden vor.

[KodeZwerg]

Ja okay, war dumm mit dem Word Objekt, dann aber so evtl.:
Ein dynamisches array erstellen und per Split alle Wörter aus TextA rein bis ein Punkt kommt.
Ein zweites dynamisches array nur für TextB.
Beide vergleichen und Treffer in ein drittes dynamisches Array rein.
Kompletten Text Rot machen.
Jetzt nur noch zu den Positionen vom dritten Array hüpfen und schwarz einfärben.

Wäre das etwas?

[GPRSNerd]

Von himitsu gabs mal eine MatchTextUnit, die sowas konnte...
http://www.delphipraxis.net/125813-s...wildcards.html

[Uwe Raabe]

Was passiert mit dem hier:

Das ist Text A.
Das könnte Text B sein, ist aber nicht Text A.


Das ist Text A.
Das könnte Text B sein, ist aber nicht Text A.

[jfheins]

Ich hab in einem Projekt Diff-Match-Patch im Einsatz: https://github.com/google/diff-match-patch

Klappt ganz gut, aber bevorzugt wohl eher größere Brocken an Änderungen:
Anhang 53927

Online demo: https://neil.fraser.name/software/di...emos/diff.html

[himitsu]

Es gibt viele einfache Diff-Funktionen/Bibliotheken/Komponenten, die nur zeilenweise vergleichen,
aber da es hier nur eine Zeile ist, könnte man auch einfach die Wörter (an Leerzeichen/Satzzeichen/Sonderzeichen) in Zeilen trennen und hinterher wieder zurück.

[DieDolly]

Ich würde es so machen wie Beyond Compare.

Das ist Text A.
Das könnte Text B sein, ist aber nicht Text A.

ergibt

Das ist Text A.
Das könnte Text B sein, ist aber nicht Text A.

[Rollo62]

Wie wäre es damit
http://www.angusj.com/delphi/textdiff.html
und darauf basierend, etwas aktueller
https://github.com/rickard67/TextDiff

[TigerLilly]

Cool, danke für die vielen Hinweise.
Ergänzungen:
- Delphi Library
- Wortweiser Vergleich
- Text 1 hat Prio, Änderungen solen in Relation zu diesem gesehen werden

Aber da hab ich jetzt schon was zum Ausprobieren. Danke!

[TigerLilly]

Zitat:

Zitat von GPRSNerd (Beitrag 1488159)

Von himitsu gabs mal eine MatchTextUnit, die sowas konnte...
http://www.delphipraxis.net/125813-s...wildcards.html

So wie ich das sehe, kann ich damit nur testen, ob eine RegEx auf einen String matcht.
Aber das da tut schon ziemlich, was ich möchte:
http://flocke.vssd.de/prog/code/pascal/pasdiff/cur/