Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#5

Re: Wort in SynEdit makieren/Selektieren ?

  Alt 2. Jul 2006, 15:18
Das kannst du mit PosEx machen.

Delphi-Quellcode:
uses StrUtils;

SelLength := PosEx(' ',Synedit1.Text {oder so}, SelStart+1) - SelStart;
wenn ich mich täusche müsstes so gehn.

Also in meinem Selbsgebauten Beispiel:

Delphi-Quellcode:
Richedit1.SelStart := Pos('Test',Richedit1.Text)-1;
Richedit1.SelLength := PosEx(' ',Richedit1.Text,Richedit1.SelStart+1)- Richedit1.SelStart;
und so müsste es bei dir gehn wenn ich mich nicht täusche..

Delphi-Quellcode:
Form1.SynEditSearch1.Pattern := JvDotNetEdit1.Text;
Form1.SynEditSearch1.FindAll(Form1.Eingabe.Lines.Text);
Form1.eingabe.SelStart := Form1.SynEditSearch1.Results[1];
Form1.Eingabe.SelLength:= PosEx(' ',Form1.Eingabe.Text, Form1.Eingabe.SelStart+1) - Form1.Eingabe.SelStart;
Gruß
Neutral General
Michael
  Mit Zitat antworten Zitat