| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Мои документы
Хуже чайника © (2006-08-02 20:44:00)Я начинаю работать с Delphi, и мне надо узнать где находиться папка мои документы, как можно сделать
DiamondShark (2006-08-02 23:46:00) [1]SHGetSpecialFolderPath с флагом CSIDL_PERSONAL
vrem (2006-08-02 22:01:00) [2]Ху ча друг бамбуча! :) читай справку! читай яндекс! чаться в сети!
Хуже чайника (2006-08-02 21:58:00) [3]GetEnvironmentVariable('USERPROFILE'), она результат в STRINGE возращает?
Rial (2006-08-02 21:36:00) [4]GetEnvironmentVariable('USERPROFILE')
Хуже чайника (2006-08-02 21:35:00) [5]Rial ©
Да я так и делал, но у меня например в реестре написано "%USERPROFILE%\Мои Документы", Что означает %USERPROFILE%\!?
Rial (2006-08-02 21:18:00) [6]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')
Megabyte (2006-08-02 21:10:00) [7]Правой кнопкой мыши по "своему компьютеру", выбираешь поиск/search, дальше сам...
| |
