谁知道wm_scroll这个东西怎么用啊(50分)

我想触发一个事件，然后用这个东西让memo向下滚动，谁有他的说明，最有有一段源代码，谢谢了

就是响应这个事件WM_SCROLL,《WINDOWS编程》上就个例子，找本书看看

先设置么Memo的scrollbars 的属性为ssVertical
再写如下代码就可以了
Memo1.Perform(WM_VSCROLL, SB_BOTTOM , 0)
如果向上就用

Memo1.Perform(WM_VSCROLL, SB_TOP,0)

具体可以查win32的帮助，输入WM_VSCROLL就可以

to Del_Sun:
好像不行

试试看：
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Memo1: TMemo;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
sendmessage(memo1.Handle,EM_LINESCROLL,0,4);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
memo1.Lines.Assign(screen.Fonts);
end;

end.

sendmessage(memo1.handle,wm_hscroll,sb_pageright,0);(后翻一页）
sendmessage(memo1.handle,em_linescroll,0,-makelong(5,0));（下移5行）

嘿嘿，大家说的都好用