Wort in Memo etc. anklicken und in String speichern

[Jens Hartmann]

Zitat von "mkinzler:

Auf Bewegungen der Maus innerhalb des Clientbereiches regieren und den Text an der Mausposition bestimmen. Dann per Ownerdraw das Wort entsprechend markieren

Das ist mir klar, das ich das so lösen könnte. Mir stellt sich halt nur die Frage, ob es da nicht eine Komponente gibt, welche das bereits in irgendeiner Art schon kann.

Gruß Jens

[Jens Hartmann]

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

[himitsu]

Zitat von Jens Hartmann:

Mir stellt sich halt nur die Frage, ob es da nicht eine Komponente gibt, welche das bereits in irgendeiner Art schon kann.

SynEdit?

[edit]
cool, es wurde ja doch noch versendet ... aber leider zu spät