Скачать: CL | DM;

как узнать номер выделеной строки в Memo?   Найти похожие ветки 

← →
elvis79   (2006-03-22 17:04) [0]

как узнать номер выделеной строки и количество выделеных строк в Memo?

---

← →
Khim ©   (2006-03-22 17:24) [1]

CaretPos Указывает строку и символ расположения курсора.

---

← →
Ega23 ©   (2006-03-22 17:27) [2]

TCustomEdit.SelStart, TCustomEdit.SelLength, TCustomEdit.SelText + F1

---

← →
zorik ©   (2006-03-22 17:29) [3]

> Khim ©   (22.03.06 17:24) [1]
>
> CaretPos Указывает строку и символ расположения курсора.
>
>

Курсор же останется в конце выделеного фрагмента :-(

---

← →
zorik ©   (2006-03-22 17:32) [4]

> Ega23 ©   (22.03.06 17:27) [2]
>
> TCustomEdit.SelStart, TCustomEdit.SelLength, TCustomEdit.
> SelText + F1


Что возвратит Memo.SelStart? Мне нужно номер строки, а не символ

---

← →
MBo ©   (2006-03-22 17:47) [5]

>Что возвратит Memo.SelStart? Мне нужно номер строки, а не символ
Номера строк получишь с помошью EM_*** сообщений

---

← →
Gydvin ©   (2006-03-22 17:51) [6]

Попробуйте это

function starpos(fmemo1:TCustomMemo):string;
var
iX,iY  : Integer;
begin

iX := 0; iY := 0;

iY := SendMessage(fmemo1.Handle, EM_LINEFROMCHAR, fmemo1.SelStart,
0);
iX := fmemo1.SelStart - SendMessage(fmemo1.Handle, EM_LINEINDEX,
iY, 0);
result := IntToStr(iY + 1) + ":" + IntToStr(iX + 1) ;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.965 c