Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Guest2 © (2002-11-05 12:56:00)
в Memo при добавлении новых строк.

Guest2 (2002-11-05 13:47:00) [1]
Так работает, а если Memo1.Text:=Memo1.Text+...+chr($0d)+chr($0a), то не хочет. Ну да ладно, я щас переделаю, спасибо.

MBo (2002-11-05 13:42:00) [2]
Что-то я тебя не пойму - вот код, 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:37:00) [3]
Ага, только я скрол у меня: Memo.ScrollBars:=ssVertical;
Как в таком случае быть?

Shrek (2002-11-05 13:32:00) [4]
там ещё есть ScrollBar1.min и ScrollBar1.max

Shrek (2002-11-05 13:31:00) [5]
ScrollBar1.Position;

Guest2 (2002-11-05 13:30:00) [6]
не понял?

Shrek (2002-11-05 13:28:00) [7]
позиция

Guest2 (2002-11-05 13:21:00) [8]
SelStart никак не влияет на положение двигунка ScroolBar

Guest2 (2002-11-05 13:11:00) [9]
Мне ScroolBar проматать надо.
PS Memo.ReadOnly:=true;

Guest2 (2002-11-05 13:09:00) [10]
видел, там не то. И не работает чегото :(

Song (2002-11-05 13:06:00) [11]
А то сам не видел соседний-то топик?

Guest2 (2002-11-05 13:05:00) [12]
Big senx

Song (2002-11-05 13:02:00) [13]
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1036486181&n=0

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »