VPF::Как установить курсор Memо компоненте?

samec

Дата 19.1.2007, 07:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 34
Регистрация: 19.1.2007

Репутация: нет
Всего: нет

Как установить курсор на определенную строку в компаненте Memo?
Вот что нашёл:
Взято из DRKB
Как установить фокус на определённую строку в компоненте Memo

установить charpos в 0.

Код


Procedure setlineMemo1:Memo; Linepos,charpos:integer); 
Begin 
 with Memo1 do  
  begin  
    selstart:=perform(EM_LineIndex,Linenum,0)+charpos; 
    sellength:=length(lines(line)); 
    perform(EM_ScrollCaret,0,0);  
  end;  
end;

но компилятор ругается на строку

Код


 sellength:=length(lines(line));

подскажите как быть?

Тутанхамец

Дата 19.1.2007, 08:25 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 612
Регистрация: 10.10.2005
Где: в пирамидЕ!

Репутация: 1
Всего: 6

Не вижу, где у тебя описана переменная line.

В примере из DRKB нужная строка выделяется. А если тебе надо просто установить курсор на первый символ в строке, то sellength:=0

Добавлено @ 08:26
Да и еще. "LinePos"<>"LineNum" smile

--------------------

Мой блог / Мои фотки / Моё Skolkobudet.ru

samec

Дата 19.1.2007, 09:28 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 34
Регистрация: 19.1.2007

Репутация: нет
Всего: нет

Спасибо большое, разобрался smile

вот:

Код


Procedure setlineMemo1:Memo; Linenum:integer); 
Begin 
 with Memo1 do  
  begin  
    selstart:=perform(EM_LineIndex,Linenum,0); 
    sellength:=0; 
    perform(EM_ScrollCaret,0,0);  
  end;  
end;

Это сообщение отредактировал(а) samec - 19.1.2007, 09:33

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »