|
|
|
Положение курсора в Memo |
::..::..:: |
Необходимо
вызвать дважды API-функцию "SendMessage":
var
xChr,
xRow,
xCol: LongInt;
...
xRow := SendMessage(Memo1.Handle, EM_LINEFROMCHAR, Memo1.SelStart, 0);
xChr := SendMessage(Memo1.Handle, EM_LINEINDEX, Zeile, 0);
xCol := Memo1.SelStart - xChr + 1;
Разместил
Razer | |
|
|
| | | | | | |
|
