Aktuelle Cursorposition in Richedit

[johannes-h]

Moin,

ich will in einem Richedit die aktuelle Cursorposition rausfinden, diese dann speichern und wieder laden lassen.

Ich hab auch schon

Delphi-Quellcode:

procedure GetCaretPos
property CaretPos

gefunden. :)

Wie setz ich die ein/Welche alternativen Lösungen gibt es ...?



Johannes

[DeddyH]

SelStart müsste eigentlich auch funktionieren, wenn ich nicht irre.

[johannes-h]

Hab's rausgefunen, wie es geht:

Delphi-Quellcode:

RichEdit1.CaretPos.X //x-Koordinate des Cursors
RichEdit1.CaretPos.Y //Y-Koordinate des Cursors

Johannes

[cebu]

funktioniert super,

aber wie kann man die CaretPos bzw. die "Zeilennummer" systemweit abfangen/abfragen.
z.B. die aktuelle Zeilennummer/CaretPos.Y im Delphi-Code-Fenster???

hab schon alles rund um GetCaretPos und den passenden Messages (EM_EXLINEFROMCHAR / EM_LINEFROMCHAR) ausprobiert aber es will einfach nicht hinhauen.
die Zeilenposition des Windows-Editors kann ich abfangen, aber beim Delphi-Code-Fenster nicht. Hat das vielleicht irgendwas damit zu tun das der Windows-Editor eher vom Typ "Memo" ist und das Code-Fenster "RichEdit"????

[UliTs]

Zitat:

Zitat von johannes-h (Beitrag 972022)

..

Delphi-Quellcode:

RichEdit1.CaretPos.X //x-Koordinate des Cursors
RichEdit1.CaretPos.Y //Y-Koordinate des Cursors

..

Vielen Dank! Danach habe ich auch gerade gesucht. Vielleicht hier noch als Stichwort: GetLineFromChar

[himitsu]

Zitat:

Zitat von UliTs (Beitrag 1467334)

Zitat:

Zitat von johannes-h (Beitrag 972022)

..

Delphi-Quellcode:

RichEdit1.CaretPos.X //x-Koordinate des Cursors
RichEdit1.CaretPos.Y //Y-Koordinate des Cursors

..

Vielen Dank! Danach habe ich auch gerade gesucht. Vielleicht hier noch als Stichwort: GetLineFromChar

Da mußt du aber aufpassen welches Char du hier verwendest, denn Delphi pfuscht grob fahrlässig nur halb an den Zeilenumbrüchen rum
und macht aus dem #13 des RichEdit ein #13#10, womit sich die Indize je Zeile um Eins verschieben.