Einzelnen Beitrag anzeigen

Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Bestimmten Text in Datei finden

  Alt 4. Mai 2008, 13:59
Zitat von Larsi:
Am Besten wäre aber das das Wort "Pferd" eine Zeile über das Wort "Kuh" getan wird und alle anderen Zeilen über Kuh dann wegen des Pferdes eine Zeile Platz machen.
Oder gehe doch die Lines vom TMemo mithilfe einer Schleife rückwärts durch und prüfe mit Pos ob das Wort Kuh vorhanden ist, dann fügst du eine neue Zeile mit dem Wort Pferd ein.
Delphi-Quellcode:
    
...
  if Pos('Kuh', Memo1.Lines.Strings[i])> 0 then
    Memo1.Lines.Insert(i, 'Pferd');
...
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat