프로그램 파일 폴더의 내용을 가져오는 예제입니다.
제 기억으로는 델파이 4부터 가능한것으로 압니다.
CSIDL_PROGRAM_FILES등의내용은 ShFolder를 참고 하시면 됩니다.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Uses shFolder; function 프로그램파일폴더_가져오기: string; var 폴더명: Array[0..MAX_PATH] of char; begin Result := ''; if SHGetFolderPath(0, CSIDL_PROGRAM_FILES, 0,0, @폴더명[0]) = S_OK then Result := 폴더명; end; |
최신 댓글