Главная страница
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.041 c
3-1166609343
maugly
2006-12-20 13:09
2007.03.18
как сделать инсталятор bde+sql links ?


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


15-1171857353
Slider007
2007-02-19 06:55
2007.03.18
С днем рождения ! 18 февраля


15-1171803931
Eraser
2007-02-18 16:05
2007.03.18
Типовые драйвера


1-1169444577
lenka_per
2007-01-22 08:42
2007.03.18
ячейка из excel больше 255 символов