Скачать: CL | DM;

Как автоматически проматывать ScroolBar?   Найти похожие ветки 

← →
Guest2   (2002-11-05 12:56) [0]

в Memo при добавлении новых строк.

---

← →
Song ©   (2002-11-05 13:02) [1]

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1036486181&n=0

---

← →
Guest2   (2002-11-05 13:05) [2]

Big senx

---

← →
Song ©   (2002-11-05 13:06) [3]

А то сам не видел соседний-то топик?

---

← →
Guest2   (2002-11-05 13:09) [4]

видел, там не то. И не работает чегото :(

---

← →
Guest2   (2002-11-05 13:11) [5]

Мне ScroolBar проматать надо.
PS Memo.ReadOnly:=true;

---

← →
Guest2   (2002-11-05 13:21) [6]

SelStart никак не влияет на положение двигунка ScroolBar

---

← →
Shrek ©   (2002-11-05 13:28) [7]

позиция

---

← →
Guest2   (2002-11-05 13:30) [8]

не понял?

---

← →
Shrek ©   (2002-11-05 13:31) [9]

ScrollBar1.Position;

---

← →
Shrek ©   (2002-11-05 13:32) [10]

там ещё есть ScrollBar1.min и ScrollBar1.max

---

← →
Guest2   (2002-11-05 13:37) [11]

Ага, только я скрол у меня: Memo.ScrollBars:=ssVertical;
Как в таком случае быть?

---

← →
MBo ©   (2002-11-05 13:42) [12]

Что-то я тебя не пойму - вот код, Memo.ScrollBars:=ssVertical и Memo.ReadOnly:=true;
Все само перематывается автоматически. Можно раскомментировать вторую строку, если по каким-то причинам у тебя не так.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
memo1.Lines.add(inttostr(gettickcount));
//Memo1.Perform(EM_ScrollCaret,0,0);
end;

---

← →
Guest2   (2002-11-05 13:47) [13]

Так работает, а если Memo1.Text:=Memo1.Text+...+chr($0d)+chr($0a), то не хочет. Ну да ладно, я щас переделаю, спасибо.

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.011 c