Switch X and Y coordinates of cursor position label in text editor, like it's in the status bar. And decrease timer interval for updating label.

This commit is contained in:
Ansgar Becker
2018-12-13 06:53:56 +01:00
parent c0dba12883
commit 5c79f6ddf9
2 changed files with 2 additions and 2 deletions

View File

@@ -134,7 +134,7 @@ begin
Lines := 0
else
Lines := CountLineBreaks(FmemoText.Text) + 1;
CursorPos := FormatNumber(FmemoText.CaretPos.X+1) + ' : ' + FormatNumber(FmemoText.CaretPos.Y+1);
CursorPos := FormatNumber(FmemoText.CaretPos.Y+1) + ' : ' + FormatNumber(FmemoText.CaretPos.X+1);
lblTextLength.Caption := f_('%s characters (max: %s), %s lines, cursor at %s', [FormatNumber(TextLen), MaxLen, FormatNumber(Lines), CursorPos]);
end;