Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

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

AW: Textdateien zusammenfassen - irgedwie falsch

  Alt 7. Jul 2017, 17:54
Wenn doppelte Header sowieso "erlaubt" sind, dann könnte man auch Alle drin lassen.

Oder zu weißt wie der Header aussieht, bzw. anfängt und löschst alle Zeilen, die z.B. mit Umsatz (ohne Soll/Haben-Kz); beginnen.

Doppelte Zeilen zu entfernen wäre jetzt auch nicht das große Problem.
Die Stringliste am Ende noch einmal durchlaufen (count-1 downto 0), mit IndexOf schauen, ob die Zeile (nochmal) gefunden wird, also gefundener Index kleiner als der aktuelle Index, und wenn ja, dann die aktuelle Zeile (I) löschen.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat