Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как в мемо переместить курсор в определённую строку? [D6, Win2k]

Shrek © (2002-11-05 12:47:00)
Как в мемо переместить курсор в определённую строку?

Shrek (2002-11-05 13:25:00) [1]
народ всем спасибо работает, я долго крутился возле этого и не видел сути, в который раз доказиваю себе о професионализме мастеров

MBo (2002-11-05 13:18:00) [2]
>только 0..255
Мягко говоря, неверно

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=1 to 1000 do memo1.lines.add(inttostr(i));
Memo1.SelStart:=Memo1.Perform(em_lineindex,50,0);
Memo1.Perform(EM_ScrollCaret,0,0);
Memo1.SetFocus;
end;

Андрей Прокофьев (2002-11-05 13:18:00) [3]
EM_LINEINDEX - это тип сообщения,
требуемая строка - второй параметр,
третий - должен быть 0

Shrek (2002-11-05 13:14:00) [4]

> MBo
EM_LINEINDEX его значение может быти только 0..255 а у меня может быть 1000 строк.

Андрей Прокофьев (2002-11-05 13:13:00) [5]
Андрей Прокофьев © (05.11.02 13:11)
>>Наверное, не самый лучший, но простой способ:
Да и неверный, если строки дублируются... :(((

MBo (2002-11-05 13:13:00) [6]
Memo1.SelStart:=Memo1.Perform(em_lineindex,50,0);

Андрей Прокофьев (2002-11-05 13:11:00) [7]
Наверное, не самый лучший, но простой способ:
Memo1.SelStart := POS(Memo1.Lines[2], Memo1.Lines.Text)-1;

Shrek (2002-11-05 13:06:00) [8]
да со стороны это так.
но у меня нет символа который бы соответсвовал строке.
если так то пожалуйста зделайте пример:

MBo (2002-11-05 13:05:00) [9]
для вычисления используй сообщение EM_LINEINDEX.
Кстати ,в EM_* еще много чего интересного

Song (2002-11-05 12:56:00) [10]
Ну само собой, что нужно перемещать не на 50-ый символ на символ, который соответствует 50-ой строке.
Вы бы, прежде чем категорично отрицать ответ компетентного человека, сначала подумали.

Shrek (2002-11-05 12:53:00) [11]
нет.
если у меня есть 100 строк, а мне надо 50 строку и я спользую selstart то курсор переместится только к 50 символу, количество символов разное.

MBo (2002-11-05 12:50:00) [12]
selstart

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »