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

Вниз

TScrollBar   Найти похожие ветки 

← →
ec   (2003-10-01 13:38) [0]

Можно свой ScrollBar в Memo использовать ? Я ни одного примера не видел с Мемо. Может кто подскажет как с его помощью прокручивать текст вверх вниз ?

---

← →
ZEE   (2003-10-01 13:58) [1]

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988619758&n=18

---

← →
ec   (2003-10-01 14:18) [2]

Как мемо вниз или вверз на 1 строку я знаю, а как сделать что бы ScrollBar ом можно было эти строки скролить.

---

← →
ZEE   (2003-10-01 14:55) [3]

примерно так
ScrollBar1.Max:=Memo1.Lines.Count;
...
procedure TForm1.ScrollBar1Change(Sender: TObject);
begin
SendMessage(Memo1.Handle,EM_LINESCROLL,0,ScrollBar1.Position-
Memo1.Perform(EM_GETFIRSTVISIBLELINE,0,0));
end;

---

← →
ec   (2003-10-01 15:42) [4]

Спасибо. Работает =]

---

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

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

Наверх

Память: 0.44 MB
Время: 0.013 c