ExtractFilePath()

ExtractFilePath()    // 파일이름을 포함한 전체 패스에서 디렉토리만 추출하고 싶은 경우

ParamStr()         // 이 함수에 몇번째 인자를 알아내고 싶은지 인덱스를 넘기면 해당 번째의 인자를 돌려줍니다.

AnsiString ProgramPath = ExtractFilePath(ParamStr(0));