박지훈.임프 님이 쓰신 글 :
: 무조건 shell32.dll에서 읽어오라는 얘기가 아니고... 레지스트리의 그 위치에 기록되어 있다고 한 거지요.
: 95/98 계열에서도 그 위치에 기록되어 있는 걸로 기억하고 있거든요.
: 또 테마 등으로 폴더 아이콘이 변경된 경우에도 마찬가지고요.
: 그러니까 일단 레지스트리를 읽어서 먼저 말씀드렸던 위치에서 지정된 파일에서 읽어들이면 됩니다.
:
:
: Julien 님이 쓰신 글 :
: : shell32.dll 에서 직접 읽어들이는 거 말고 다른 방법은 없을까요?
: : SHGetFileInfo 와 같이 운영체제와 무관한 방법이 혹시 있지 않을까 해서요..^^
: : 윈도계열이면 운영체제가 달라져도 상관이 없는 건가요?
: : 윈 98에서도 shell32.dll 의 파일 이름은 그대로인감??
: : 다시 한 번 부탁드립니다.
: :
: : 박지훈.임프 님이 쓰신 글 :
: : : 레지스트리에서...
: : : HKEY_CLASSES_ROOT\Directory\DefaultIcon
: : : 여기에서 기본값을 읽으시면 됩니다.
: : :
: : : 폴더 아이콘이 별도로 변경되지 않았다면 다음과 같이 되어있을 겁니다.
: : : %SystemRoot%\System32\shell32.dll,3
: : :
: : : %SystemRoot%\는 윈도우 디렉토리의 알리아스입니다. (윈도우 NT나 2000이라면 C:\WINNT, XP라면 C:\WINDOWS)
: : : OS 레벨의 알리아스이므로 파일 입출력 함수에서 그냥 그대로 인자로 넘겨주면 됩니다.
: : : 컴마 뒤의 3은 해당 dll 안에서 세번째 아이콘이라는 얘깁니다.
: : :
: : : 그럼...
: : :
: : :
: : : Julien 님이 쓰신 글 :
: : : : 각 파일에 대하여 SHGetFileInfo 를 이용하여 운영체제에서 사용하고 있는 아이콘을 읽어와서 파일에 맞는 아이콘을 파일이름 앞에 표시하도록 하였습니다.
: : : : 그런데 폴더에 대한 아이콘은 어떻게 알 수 있는 지요?
: : : :
: : : : ListView1->Items->Clear();
: : : : ImageList1->Clear();
: : : :
: : : : UINT flags = SHGFI_ICON | SHGFI_ICONLOCATION | SHGFI_SYSICONINDEX | SHGFI_TYPENAME;
: : : :
: : : : TSHFileInfo fileinfo;
: : : : TListItem* item;
: : : : TIcon* icon;
: : : : TSearchRec sr;
: : : : res = FindFirst(DirectoryListBox1->Directory + "\\*.*", faDirectory | faArchive | faAnyFile, sr);
: : : : while(res == 0)
: : : : {
: : : :     if(sr.Name.c_str()[0] == '.')
: : : :         goto CONTINUE;
: : : :     item = ListView1->Items->Add();
: : : :     item->Caption = sr.Name;
: : : :     SHGetFileInfo(item->Caption.c_str(), 0UL, &fileinfo, sizeof(fileinfo), flags);
: : : :     icon = new TIcon;
: : : :     icon->Handle = ImageList_GetIcon((_IMAGELIST*)hsysicon, fileinfo.iIcon, 0);
: : : :     item->ImageIndex = ImageList1->AddIcon(icon);
: : : :     item->SubItems->Add(String(fileinfo.szTypeName));
: : : :     delete icon;
: : : : CONTINUE:
: : : :     res = FindNext(sr);
: : : : }
: : : : FindClose(sr);
: : : :