动态库里的定时器 问题 ~！！！！！！！！！

Question

procedure Timer1Timer(hwnd:HWND;uMsg,idEvent:UINT;dwTime:DWORD);stdcall;
begin
end;
procedure  InitSystem(Sender: TObject);  stdcall; 
begin
 SetTimer(0,10,30,@Timer1Timer);
end;exports InitSystem      name 'InitSystem'     resident;调用InitSystem  会有运行错误，，为什么呢？？？？

Answer 1

你的Timer1Timer函数怎么写的？

Answer 2

Timer1Timer  里边什么也没写 
运行就出现错误

Answer 3

既然你的InitSystem是输出函数的话，怎么里面会有Sender: TObject这样的参数呢？