Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Spalte und Zeile von SynMemo herausfinden (https://www.delphipraxis.net/14066-spalte-und-zeile-von-synmemo-herausfinden.html)

MikeC 1. Jan 2004 15:53


Spalte und Zeile von SynMemo herausfinden
 
Hi

ich habe mal versuch, die TextCursor-Position in einem SynMemo heraus zu finden (also Line und Column). Das ganze habe ich wie mit nem normalen Memo gemacht, also mit EM_LINEFROMCHAR und EM_LINEINDEX. Delphimäßig sieht das so aus

Delphi-Quellcode:
function GetMemoRow (M:TMemo): LongInt; {<-- hier habe ich bei meinem versuch TMemo durch TSynMemo ersetzt!}
begin
  Result := SendMessage (m.Handle, EM_LINEFROMCHAR,M.SelStart,0);
end;

function GetMemoCol (M:TMemo):LongInt; {<-- hier habe ich bei meinem versuch TMemo durch TSynMemo ersetzt!}
begin
  Result := M.Selstart-SendMessage (M.Handle, EM_LINEINDEX, SendMessage(M.Handle, EM_LINEFROMCHAR, M.SelStart,0),0);
end;
Anzeigen wollte ich das in einer Statusbar.

Wenn ich das jetzt so auf ein TSynMemo übertrage, wir nur GetMemoRow berücksichtigt, egal, ob ich mich mit dem Cursor durch die Rows oder die Cols bewege. Hat jemand ne Idee, wie man das ändern könnte, dass das auch mit nem TSynMemo funtz?

Greetz
Mike

Basic-Master 1. Jan 2004 18:03

Re: Spalte und Zeile von SynMemo herausfinden
 
ruf die infos doch einfach per synedit.curpos ab

MikeC 1. Jan 2004 19:11

Re: Spalte und Zeile von SynMemo herausfinden
 
thx...

ich weiß nicht, wie es bei SynEdit ist, aber by SynMemo geht das ganze über CaretX und CaretY bzw CaretXY

verwendet natürlich in den Key-Events vom SynMemo


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:57 Uhr.

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