Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi wort in memo finden (https://www.delphipraxis.net/137649-wort-memo-finden.html)

Surge0n 25. Jul 2009 12:18


wort in memo finden
 
hi
ich möchte gern aus einer memo ein wort auslesen und dieses dann rot färben
ich habe es mit pos(memo1.lines.string[1],'wort'
probiert um den standort des wortes zu ermitteln doch irgendwie will es nicht funktionieren... :?:

SirThornberry 25. Jul 2009 12:41

Re: wort in memo finden
 
Zitat:

doch irgendwie will es nicht funktionieren...
Und was bedeutet das? Was heißt "funktioniert nicht"? Kommt eine Fehlermeldung?
Und du bist dir auch sicher das in der zweiten Zeile des Memos das Wort vorkommt?

SimStar001 25. Jul 2009 13:35

Re: wort in memo finden
 
durchsuch doch das memo zeile für zeile nach dem string.

Delphi-Quellcode:
for i:= 0 to memo1.lines.count - 1 do
  if posex('gesuchterString',memo1.lines[i]) > 0 then
    begin
    tue etwas
    end;

Diese schleife setzt vorraus, dass der string auch nur einmal vorhanden ist. wenn mehrere pro zeile gibt musst du dir halt ein bissl was einfallen lassen!


LG Marco!

Surge0n 25. Jul 2009 14:13

Re: wort in memo finden
 
danke für die hilfe abereine frage hätt ich noch...kann ich dann auch diesen string rot färben??

SirThornberry 25. Jul 2009 14:29

Re: wort in memo finden
 
in einem Memo geht das nicht.

fkerber 25. Jul 2009 14:31

Re: wort in memo finden
 
zur Ergänzung:
Dafür kannst du z.B. ein TRichEdit nehmen.


Grüße, Frederic

Surge0n 25. Jul 2009 16:47

Re: wort in memo finden
 
ich habe einen code für die veränderung der farben gefunden doch da kommt immer der fehler "ungültige typumwandlung"

Delphi-Quellcode:
richedit1.FindText('let',0,length(richedit1.Text),string(stwholeword)).color:=clred;

fkerber 25. Jul 2009 17:15

Re: wort in memo finden
 
Was ist denn stwholeword?

Grüße, Frederic

Surge0n 25. Jul 2009 17:39

Re: wort in memo finden
 
das stand unter "tsearchtypes"

Spanky 25. Jul 2009 18:03

Re: wort in memo finden
 
FindText liefert die Position des Strings, also ein Integer. Du musst den Text, den du verändern möchtest, erst markieren (Eigenschaften SelStart und SelLength).

Du solltest dir außerdem mal die SelAttributes Eigenschaft vom TRichEdit anschauen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:47 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