Richedit.Findetext liefert immer "-1"

[Lyan]

Hallo,

ich kann mir nicht erklären warum, aber findetext liefert immer "-1" zurück!

Code:

tsearchs := [stwholeword];
ipos := RichEdit2.FindText(':',0,length(richedit2.Lines[i]), tsearchs);

Jemand eine Idee?


MfG

lyan

[Coffeecoder]

Hey,

Ich habe keine Möglichkeit nachzusehen, aber hast du bei length folgendes versucht:

Code:

tsearchs := [stwholeword];
ipos := RichEdit2.FindText(':',0,length(richedit2.Lines[i])-1, tsearchs);

[himitsu]

Gibt es in der angegebenen Zeile überhaupt einen Doppelpunkt, vor und hinter dem sich keine alphanumerischen Zeichen befinden?

[franktron]

Das geht doch garnicht so

Delphi-Quellcode:

tsearchs := [stwholeword];
ipos := RichEdit2.FindText(':',0,length(richedit2.Lines[i]), tsearchs);

Damit such der doch immer nur in der Ersten Zeile und nicht in den Anderen.

[himitsu]

Zitat von franktron:

Damit such der doch immer nur in der Ersten Zeile und nicht in den Anderen.

Hatte ich auch erst falsch übersehn und hatte statt "angegebenen" ebenfalls "erste" geschrieben.

Nicht die Erste, sondern die i-te

[mikhal]

funktioniert denn das?

Delphi-Quellcode:

tsearchs := [stwholeword];
ipos := RichEdit2.FindText(':',0,length(richedit2.Text) - 1, tsearchs);

Grüße
Mikhal

[himitsu]

Zitat von mikhal:

funktioniert denn das?

Delphi-Quellcode:

tsearchs := [stwholeword];
ipos := RichEdit2.FindText(':',0,length(richedit2.Text) - 1, tsearchs);

Grüße
Mikhal

nicht - 1 , denn es ist nicht das, von, bis, wie , sondern das, von, Anzahl, wie

[Lyan]

Mein Suchstring sieht so aus:

Code:

172.88.21.76:hallo:okay

[himitsu]

Und demnach ist die -1 auch vollkommen korrekt.

siehe #3
Die Antwort auf meine Frage lautet nämlich "nein".

[Lyan]

merke grade das es nicht geht.

Hat jemand eine Idee?

Ich hatte es so vor:

Delphi-Quellcode:

ipos := RichEdit2.FindText(':',0,length(richedit2.Lines[i]), tsearchs);
    sIP := copy(Richedit2.Lines[i],0,ipos-1);
    ipos := RichEdit2.FindText(':',length(sIP)+1,length(richedit2.Lines[i]), tsearchs);
    sUsr := copy(richedit2.lines[i],length(sIP)+1,ipos-1);
    iPos := Pos(#$D#$A,richedit1.lines[i]);
    spwd := copy(richedit2.Lines[i],length(sip)+length(susr)+2,ipos-1);
    richedit1.Lines.Delete(i);

MfG