ShellExecute(0,nil,PCHar(IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName))+ '2.EXE'),nil,nil,SW_HIDE);