Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c
15-1153423356
Ломброзо
2006-07-20 23:22
2006.08.20
GPRS от MTC


2-1154244683
vain
2006-07-30 11:31
2006.08.20
«Дескриптор»


2-1154598822
rem2
2006-08-03 13:53
2006.08.20
Opendialog


2-1154375035
Damager
2006-07-31 23:43
2006.08.20
Дочерние формы. Прорисовка.


2-1154136447
Батя
2006-07-29 05:27
2006.08.20
E-mail




   Наверх