Question

A.Event1 := nil; A.Event2 := nil; try   ... finally   A.Event1 := MyEvent1;   A.Event2 := MyEvent2; end; 

Can something go wrong with it?

EDIT:

I’ve accepted Barry’s answer because it answered exactly what I asked, but Vegar’s answer is also correct depending on the scenario, sadly I can’t accept both.

Answer 1

It entirely depends on what happens in the bit of code marked ‘…’. If it e.g. starts up a background thread and tries to invoke Event1 or Event2 after execution has continued into the finally block, you may get unexpected results.

If the code is entirely single-threaded, then yes, neither Event1 nor Event2 should be triggered while the code is between the try and finally.

However, that does assume that Event1 and Event2 properties (all Delphi events are properties of a method pointer type) do not do unusual things in their setters. A pathologically malicious event setter could squirrel away a method pointer, and still be able to invoke it, even after you later call the setter with ‘nil’ as the value.

But that would be highly unusual behaviour.