Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

Прокрутка memo в самый вверх.   Найти похожие ветки 

 
S46E ©   (2007-02-26 19:26) [0]

На форме мемо позволяет увидеть две строки. При двух добавлениях memo1.Add(string) memo прокручивается вниз, на третью, пустую строку..как можно решить проблему с литшней пустой строкой? memo1.lines.Delete(memo1.lines.count-1) не помогает:( Подумал можно просто прокрутить мемо вверх. Какой командой это делается?


 
Calibr ©   (2007-02-26 19:45) [1]

Вот так должно помочь:

 Memo1.SetFocus;
 keybd_event(VK_CONTROL, 0, 0, 0);
 keybd_event(VK_HOME, 0, 0, 0);
 keybd_event(VK_HOME, 0, KEYEVENTF_KEYUP, 0);
 keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);


 
trubin ©   (2007-02-26 19:47) [2]

Св-ва SelStart и SelLength


 
S46E ©   (2007-02-26 20:11) [3]


sw_memo.SelLength:=0;
sw_memo.SelStart:=0;

Не помогает.


Memo1.SetFocus;
keybd_event(VK_CONTROL, 0, 0, 0);
keybd_event(VK_HOME, 0, 0, 0);
keybd_event(VK_HOME, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
List_switch.SetFocus;

при перемещении фокуса зачем-то постоянно жмется вверх....(( List_switch - это ListBox


 
S46E ©   (2007-02-26 20:12) [4]

сорри,

sw_memo.SelLength:=0;
sw_memo.SelStart:=0;

работает, не правильно поставил местами строчки-)


 
FIL-23 ©   (2007-02-26 20:15) [5]

memo1.SelStart:=0;
Memo1.Perform(EM_SCROLLCARET, 0, 0);



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

Текущий архив: 2007.03.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.061 c
2-1172069051
dmdel
2007-02-21 17:44
2007.03.18
Безопасность в FB


15-1171727368
hhjjkk
2007-02-17 18:49
2007.03.18
Как ПОЛНОСТЬЮ удалить 1С с компа?


2-1172090405
Kyau
2007-02-21 23:40
2007.03.18
Позиция курсора в TEdit


3-1166435221
mezozoy
2006-12-18 12:47
2007.03.18
структура базы данных


15-1171879112
Ega23
2007-02-19 12:58
2007.03.18
В Delphi7 - Project Manager