Einzelnen Beitrag anzeigen

Florian H

Registriert seit: 30. Mär 2003
Ort: Mühlacker
1.043 Beiträge
 
Delphi 6 Professional
 
#1

Text in Datei suchen, Problem mit Absätzen

  Alt 16. Dez 2004, 17:51
Hi,

ich habe mich an folgendem Code bedient, um eine Textstelle in einem Text zu finden: http://www.swissdelphicenter.ch/de/showcode.php?id=847

Leider habe ich danach ein Problem mit der Anzeige der Stelle (ich lade dann den ganzen Text in ein Memo), denn die Funktion gibt als Result die Position zurück, an der das gesuchte Wort steht. Jedoch offensichtlich ohne die Absätze (#13) mitzuzählen. Denn wenn ich dann sowas mache (vereinfacht)
Delphi-Quellcode:
memo1.Lines.LoadFromFile('die datei die auch durchsucht wurde');
memo2.Text := copy(memo1.Lines.GetText, res-50,100); // res = Rückgabewert der Fkt.
ist das alles etwas zu weit oben, ich glaube, es liegt an den absätzen.

Was kann man da machen?
Ich bin bei dem sicherlich hochoptimierten Suchcode noch nich ganz durchgestiegen und konnte deshalb selber nich viel machen ausser stundenlang sinnlos probieren -.-

grüße und thx
flo
Florian Heft
  Mit Zitat antworten Zitat