Текущий архив: 2006.08.20;
Скачать: CL | DM;
Вниз
Мои документы Найти похожие ветки
← →
Хуже чайника (2006-08-02 20:44) [0]Я начинаю работать с Delphi, и мне надо узнать где находиться папка мои документы, как можно сделать
← →
Megabyte © (2006-08-02 21:10) [1]Правой кнопкой мыши по "своему компьютеру", выбираешь поиск/search, дальше сам...
← →
Rial © (2006-08-02 21:18) [2]function ExtractRegName(Const Root:DWord;Const Path,Name:String):String;
Var Reg:TRegistry;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=Root;
Try
If Reg.OpenKey(Path,False)then Result:=Reg.ReadString(Name);
Finally
Reg.Free;
end;
end;
function ExtractShellFolderName(Const Name:String):String;
begin
Result:=ExtractRegName(HKEY_CURRENT_USER,
"\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders",
Name);
end;
В итоге - ExtractShellFolderName("Personal")
← →
Хуже чайника (2006-08-02 21:35) [3]Rial ©
Да я так и делал, но у меня например в реестре написано "%USERPROFILE%\Мои Документы", Что означает %USERPROFILE%\!?
← →
Rial © (2006-08-02 21:36) [4]GetEnvironmentVariable("USERPROFILE")
← →
Хуже чайника (2006-08-02 21:58) [5]GetEnvironmentVariable("USERPROFILE"), она результат в STRINGE возращает?
← →
vrem (2006-08-02 22:01) [6]Ху ча друг бамбуча! :) читай справку! читай яндекс! чаться в сети!
← →
DiamondShark © (2006-08-02 23:46) [7]SHGetSpecialFolderPath с флагом CSIDL_PERSONAL
Страницы: 1 вся ветка
Текущий архив: 2006.08.20;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.03 c
