Как просмотреть папку рабочий стол, мой компьютер...

← →
anod © (2002-06-15 00:59) [0]

Подскажите, в SHGetPathFromIDList выдает ошибку:
var pidl : PITEMIDLIST; szPath : PCHAR; begin SHGetSpecialFolderLocation(Handle, CSIDL_DESKTOP, pidl); if SHGetPathFromIDList(pidl, szPath) then begin if ShellExecute(handle, "open" , szPath, nil, nil, SW_SHOW) < 32 then ShowMessage("Немогу выполнить ShellExecute !"); end;

← →
anod © (2002-06-15 17:04) [1]

При написании такого кода запускаются те папки, которые не виртуальные, а как просмотреть виртуальные?

var pidl : PItemIDList; szPath : Array[0..max_path-1] of WideChar; begin SHGetSpecialFolderLocation(Handle, nFolder, pidl); if SHGetPathFromIDList(pidl, @szPath[0]) then begin if ShellExecute(handle, "open" , @szPath[0], nil, nil, SW_SHOW) < 32 then ShowMessage("Немогу выполнить ShellExecute !"); end;

← →
~Rand~ © (2002-06-15 23:02) [2]

Удалено модератором

← →
GOOFFY (2002-06-16 11:09) [3]

Удалено модератором

← →
anod © (2002-06-16 11:11) [4]

2GOOFY
Это к чему !?!

← →
stikriz (2002-06-16 11:15) [5]

Удалено модератором

← →
GOOFFY (2002-06-16 11:18) [6]

Удалено модератором

Может кто-нибудь поможет всё-таки - как отобразить Панель управления или Мой Компьютер

Как просмотреть папку рабочий стол, мой компьютер... Найти похожие ветки