Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Position des Textcursors setzen/lesen (TMemo) ? (https://www.delphipraxis.net/9388-position-des-textcursors-setzen-lesen-tmemo.html)

Dannyboy 25. Sep 2003 13:26


Position des Textcursors setzen/lesen (TMemo) ?
 
Mmmmhh :gruebel:, da man einem Memofeld auch Carets zuweisen kann,
müsste das Lesen und Schreiben der Position des Cursors nicht allzu
schwierig sein, oder? Habe hier schon mal gesucht, aber leider nix
passendes gefunden und mit SelStart funzt das irgendwie net. Bin auch
auf kein Property gestoßen, welches zufällig die Cursorposition beinhalt
und was mich am meisten ärgert ist, dass ich das sogar im alten Pascal
hinbekommen hätte: Gotoxy(xpos,ypos) :wink:

Um Missverständnisse zu vermeiden:
Ich meine die Textposition des Cursors und nicht die Pixelposition.

Ich habe dieses Thema in die Kategorie API gepostet, vielleicht gibt's
hier Funktionen dafür.

Das kann doch nicht so schwer sein, oder?

Gruß

DANNYBOY

Christian Seehase 25. Sep 2003 13:42

Re: Position des Textcursors setzen/lesen (TMemo) ?
 
Moin Dannyboy,

die einzige Möglichkeit die mir da so spontan einfällt ist SelStart zu setzen. Dann wird das Caret entsprechenden positioniert.
GotoXY kann nicht funktionieren, da es ja keine definierte Anzahl Zeilen/Spalten gibt, wie noch unter DOS.

Mit EM_LINEINDEX kannst Du Dir hierzu die Position, des ersten Zeichens der angegebenen Zeile besorgen, und musst dann nur noch die gewünschte Spalte draufaddieren.

Dannyboy 25. Sep 2003 13:46

Re: Position des Textcursors setzen/lesen (TMemo) ?
 
Das mit Gotoxy war nur Spass. Phantasie aus meiner Pascal-Zeit. :wink:
Aber das mit dem EM_LINEINDEX werde ich dann mal ausprobieren, das
kannte ich noch nicht.

Thx.

DANNY


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:59 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz