Disabling an event handler after its first exexcution

Have you ever wanted to keep an event from firing once it has executed? Simply set the event handler method to nil in the body of the method. For instance, let's say you want to disable an OnClick for a button once the user has pressed it. Here's the code to do that:

~~~~~~~~~~~~~~~~~~~~~~~~~
procedure Button1OnClick;
begin
  //code to be done only once!

  Button1.OnClick := NIL;
end;
~~~~~~~~~~~~~~~~~~~~~~~~~

Delphi tips navigator:
» How to use a dialog window to select a folder
« How to add a button to the IE Toolbar