https://minasoftprogrammation.blogspot.com/2022/11/maskedit-in-delphi.html