请问关闭一个事件和开启动一个事件的有关问题

请教关闭一个事件和开启动一个事件的问题
比如我把一个click   nil了   暂时关闭了!onclick:=nil;
那么我怎么再把它开启!
试了很多办法都没有用!



[解决办法]
TDemoForm = ....
...
private
tmpEvent :TNotifyEvent;

end;


proceudre TDemoForm.DisableEvent;
begin
tmpEvent := Self.Button1.Onclick;
button1.onclick := nil;
end;

procedure TDemoForm.EnableEvent;
begin
Button1.onclick := tmpEvent;
end;