Einzelnen Beitrag anzeigen

lucy

Registriert seit: 25. Okt 2017
67 Beiträge
 
Delphi XE7 Starter
 
#17

AW: String mit einer Datei abgleichen

  Alt 6. Nov 2022, 12:04
Delphi-Quellcode:
Ersetze s3 := StringReplace( List.Strings[i], ',', '', [rfReplaceAll] ); doch mal durch s3 := StringReplace( List.Strings[i], ',', sLineBreak, [rfReplaceAll] ); Wie sieht es jetzt aus?

if s2 = s3 then würde ich auch noch durch if Trim(s2) = Trim(s3) then ersetzen um bei dem Vergleich mögliche Leerzeichen zu ignorieren.
jetzt werden die Zahlen im ShowMessage(s3) aus der Liste untereinandergeschrieben (aber alle Zahlen) das möchte ich auch nicht.

ich habe eine Liste:

12345,
67891,
98765,
32165

wenn jetzt zum Beispiel : s2 = "67891" ist, soll in der Liste geprüft werden ob diese Zahl vorhanden ist?

ja die Zahl : "67891" ist vorhanden! (ShowMessage (s3) = "67891")
  Mit Zitat antworten Zitat