https://yutant.blogspot.com/2018/06/kill-process-on-taksmanager-by-delphi.html