自己up一下！

簡單點的, 引入一個form就可

<<delphi 深度歷險>> 說的比較詳細

难道遇见aiirii兄，在下甚感欣慰！
可惜我没有《delphi 深度历险》这本书，不过这本书的知名度早已如雷贯耳。在下倒是有《delphi 深度探索》一书。

引入一个Form后，dll增加了700多k的数据沉余，感觉很不爽。

Timer是在DLL中吗?

//在dll中定义个对外函数
uses Classes  ...
procedure SetOnTimeEvent(Aproc:TNotifyEvent);stdcall;
...
...
procedure SetOnTimeEvent(Aproc:TNotifyEvent);
begin
  if Assigned(Aproc) then
    Timer.OnTimer := Aproc;
end;


//--------------------------------------------
在调用程序中
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  public
    procedure ProcOnTimeEvent(Sender:TObject);
  end;
...
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  SetOnTimeEvent(ProcOnTimeEvent);//将ProcOnTimeEvent赋给DLL中Timer的OnTimer
end;

procedure TForm1.ProcOnTimeEvent(Sender: TObject);
begin
 //OnTimer事件中要执行的动作
end;

to firef兄：OnTimer要在Dll中触发哦，不是引出去。

自己再up！难道就真的找不到答案吗？

亲爱的朋友：
  我给两个建议：
  1.SetTimer();把DLL种的一个OnTimer过程指针传进去！
  2.做一个回调函数，在调用段也是把函数基址传进去

谢谢delphi_xizhousheng兄：

Timer还可以用SetTimer之类的API函数搞定，那其他的VCL组件的事件怎么办，该不会都用API函数吧，偶的DLL里还有WinSocket以及其他的VCL组件哦！

既然OnTimer就是要赋给个对象方法,就在Dll中定义个类,也没什么不行啊

TMyObject = class(TComponent)
protected
  Timer:TTimer;
  procedure DoOnTime(Sender:TObject);//将此赋给Timer.OnTimer
public
  constructor Create(AOwner: TComponent);override;
  destructor Destroy;
  ...
  ...
end;