In Delphi 12 you can write TPath.GetAppPath using System.IOUtils unit.
TPath.GetAppPath
System.IOUtils