~~~~~~~~~~~~~~~~~~~~~~~~~
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

