Wort in Memo etc. anklicken und in String speichern

[Jens Hartmann]

Hallo und schönen guten Abend,

ich suche die ganze Zeit schon nach einer Lösung ein Wort in einem Memo oder ähnlicher Komponente anzuklicken und weiter zu nutzen. Soll heißen, ich möchte einen Text in einem Memo etc. anzeigen. Wenn der User jetzt mit der Maus ein bestimmtes Wort mit der Maus überfährt, soll sich der Curser verändern und das Wort soll anklickbar sein. Klickt man das Wort an, möchte ich es an eine Variable übergeben.

Gibt es da was fertiges oder eine Idee wie man das lösen kann?

Danke schon mal und Gruß Jens

[mkinzler]

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

[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