Código Delphi [-] begin Application.OnMessage:= ApplicationEvents1Message ...
begin Application.OnMessage:= ApplicationEvents1Message ...