Mehrere Dateien in Memo laden?

[jaenicke]

Schau dir einmal PosEx an zum Beispiel.

[coolio]

Ja, habe ich auch schon drüber gelesen, doch wenn ich bei Delphi nun PosEx schreibe, meint Delphi "Undeklarierter Bezeichner" :shock: In Delphi 09 sowie in 05 :( Verstehe ich nicht.

[jaenicke]

Wie wäre es mit einem Blick in die Hilfe? Die Funktion ist in der Unit StrUtils enthalten, die gibt es aber glaube ich erst ab Delphi 6.

[coolio]

Habe in die Hilfe geschaut, doch über StrUtils stand da nichts. Naja ich hoffe, dass ich euch nun nicht mehr belästigen muss. ;)
Danke aber. :)
Edit: Hast recht stand doch dabei. :D

[jaenicke]

Eigentlich steht die Datei dabei, wenn du die Funktion gefunden hast: ;-)
http://docs.embarcadero.com/products...ils_PosEx.html
Ist ja auch egal, für Delphi 5 jedenfalls müsstest du einmal schauen, ich habe hier im Forum schon PosEx Implementierungen gesehen.

[coolio]

Also irgendwie weiß ich doch nicht, wie PosEx nun mein Problem lösen soll. Soweit ich das verstanden habe funktioniert PosEx ja so:

PosEx('hallo', 'hallo wie gehts',Offset) Bis zum Offset verstehe ich es ja noch. Nur ich verstehe nicht was ich da nun bei Offset eintragen muss, damit auch die ganze Stringliste durchsucht wird. Habe eig alles probiert aber es will nicht funktionieren. Ich will doch einfach nur alles durchsuchen, das kann doch nich so schwer sein. :( Mein Code sah jetzt am Ende mal so aus:

Delphi-Quellcode:

n := 1;
begin
  for i := 0 to strli.Count - 1 do
  begin
    if posex(Edit1.Text, strli[i], n) > 0 then
    begin
      Memo2.Lines.Add('Eigener Suchbegriff vorhanden')
    end;
  end;
end;

[jaenicke]

Zitat:

Zitat von coolio

Nur ich verstehe nicht was ich da nun bei Offset eintragen muss, damit auch die ganze Stringliste durchsucht wird.

Eine Stelle nach der letzten Fundstelle. Gesucht wird ab der dort angegebenen Position.

[coolio]

Ich schaffe es nicht. Keine Ahnung mehr was ich falsch mache. Sitze da jetzt schon so lange dran, aber ich komme nicht drauf. :(