[Помогите!] Мэмо и скролбар

[Dimedrol1536]

Как использовать прокрутку ScrollBar`om в Memo?


Нашол вот такое, но лутше было-бы скролом

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if Key = VK_F1 then SendMessage(Memo1.Handle, WM_VSCROLL, SB_PAGEDOWN{На страницу вверх}, 0) 

else if Key = VK_F2 then SendMessage(Memo1.Handle, WM_VSCROLL, SB_PAGEUP{На страницу вниз}, 0);
end;

end.

[VeTaL_UA]

Изменить свойство ScrollBars на ssVertical...

[=PaLeTiZaToR=]

Блин... warl0ck ... археолог хренов .... я тоже дурак )))
ps...
[Ссылки могут видеть только зарегистрированные пользователи. ]

[VeTaL_UA]

А ты для появления скролбара код писал?