|
Registriert seit: 11. Jan 2009
Ort: Wilnsdorf
1.439 Beiträge
Delphi XE2 Professional
|
AW: Wort in Memo etc. anklicken und in String speichern
15. Dez 2010, 19:20
Und dann sucht man weiter und findet durch Zufall doch etwas. Die Lösung heißt einfach nur SynEdit. Und dann über folgenden Code...
Delphi-Quellcode:
procedure TForm4.SynEdit1MouseCursor(Sender: TObject;
const aLineCharPos: TBufferCoord; var aCursor: TCursor);
begin
Label1.Caption := SynEdit1.GetWordAtRowCol(aLineCharPos);
end;
Gruß Jens
Jens Hartmann
Das Leben selber ist zu kurz, also nutze jeden Tag wie er kommt.
|