https://infervour.com/blog/how-to-send-an-event-to-multiple-forms-in-delphi