Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Memo nach einem String durchsuchen (https://www.delphipraxis.net/151268-memo-nach-einem-string-durchsuchen.html)

Lars_Vegas 10. Mai 2010 14:31


Memo nach einem String durchsuchen
 
Hallo Leute,
wahrscheinlich wurde diese Frage schon 1.000 mal gestellt. Hab aber schon die SuFu benutzt und nichts (für mich) verständliches gefunden (bin (blutiger) Anfänger)...

Nun zu meinem Problem / zu meiner Frage:
Ich habe ein Memo, welches den Quelltext einer Website beinhaltet.
Nun will ich dieses Memo nach dem Satz "Beispiel" durchsuchen.

Sinn der Sache ist es, durch eine Suche einen boolean Wert zurückzugeben, ob der Text "Beispiel" in dem Memo vorkommt oder nicht.
Das könnte man dann irgendwie nett in einer Function zusammenfassen und dann später prüfen
Delphi-Quellcode:
IF DurchsucheMemo(Form1.Memo1, 'Beispiel') = TRUE
THEN ...
ELSE ...
Ihr wisst sicherlich was ich meine :P


Ich habe schon überlegt, wie ich es mit meinem Wissen umsetzen könnte, aber das wäre sicherlich zu kompliziert. Ich bin sicher, dass es auch einfacher geht. :stupid:

Deshalb würde ich mich sehr freuen, wenn ihr mir helfen könntet :-D

Liebe Grüße
Lars_Vegas

mkinzler 10. Mai 2010 14:35

Re: Memo nach einem String durchsuchen
 
Delphi-Quellcode:
If Pos( <Suchtext>, Memo1.lines.Text) <> 0 then ...

Lars_Vegas 10. Mai 2010 14:43

Re: Memo nach einem String durchsuchen
 
Wunderbar :-D
Vielen Dank!
Werd's gleich mal testen :thumb:

DeddyH 10. Mai 2010 14:55

Re: Memo nach einem String durchsuchen
 
Als Alternativen gäbe es da auch noch Delphi-Referenz durchsuchenAnsiContainsStr (case-sensitive) bzw. Delphi-Referenz durchsuchenAnsiContainsText (case-insensitive).


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:07 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz