AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign Zwei Texte wortweise vergleichen + Unterschiede markieren

Zwei Texte wortweise vergleichen + Unterschiede markieren

Ein Thema von TigerLilly · begonnen am 29. Apr 2021 · letzter Beitrag vom 30. Apr 2021
Antwort Antwort
Seite 1 von 2  1 2   
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
1.174 Beiträge
 
Delphi 11 Alexandria
 
#1

Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 10:22
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?
  Mit Zitat antworten Zitat
Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.268 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 10:31
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?
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 10:33
Also so ähnlich, wie das Word auch macht.
Wenn es Word kann, benutze doch ein Word COM-Objekt um das zu erreichen.
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.268 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 10:38
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?
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
1.174 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 10:40
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.
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#6

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 10:48
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?
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Benutzerbild von GPRSNerd
GPRSNerd

Registriert seit: 30. Dez 2004
Ort: Ruhrpott
239 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 11:06
Von himitsu gabs mal eine MatchTextUnit, die sowas konnte...
http://www.delphipraxis.net/125813-s...wildcards.html
Stefan
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
10.993 Beiträge
 
Delphi 12 Athens
 
#8

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 12:20
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.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#9

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 16:02
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:
diff.png

Online demo: https://neil.fraser.name/software/di...emos/diff.html
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.114 Beiträge
 
Delphi 12 Athens
 
#10

AW: Zwei Texte wortweise vergleichen + Unterschiede markieren

  Alt 29. Apr 2021, 16:08
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.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:06 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz