|
|
|
|
?? Прокрутка Memo ??
И вот что я вам отвечу:
|
Var ScrollMessage:TWMVScroll;
ScrollMessage.Msg:=WM_VScroll;
for i := Memo1.Lines.Count DownTo 0 do
begin
ScrollMessage.ScrollCode:=sb_LineUp;
ScrollMessage.Pos:=0;
Memo1.Dispatch(ScrollMessage);
end;
|
|
|
|
|
|