Código Delphi [-]if not (ExtractFilePath(Application.ExeName) = 'C:\MiCarpeta\') then exitprocess(0)
if not (ExtractFilePath(Application.ExeName) = 'C:\MiCarpeta\') then exitprocess(0)