Katalog pulpitu

Jak sprawdzić w jakim katalogu jest pulpit?

W Desktop

Ja brałbym pod uwagę trzy lokacje, bo chyba nie ma żadnej funkcji na odczytanie ścieżki pulpitu:

1. Win9x - 'C:\Windows\Pulpit' - najpierw jakaś funkcja do pobrania ścieżki katalogu Windows, a potem tylko dodajesz 'Pulpit'

2. WinXP - 'C:\Documents and Settings' + User + '\Pulpit' - tutaj musisz skorzystać z jakiejś funkcji do pobierania nazwy aktualnego użytkownika

3. WinXP - 'C:\Documents and Settings\All Users.WINDOWS\Pulpit' - tę lokację też należy brać pod uwagę

Funkcje wymienione w tekście powinieneś znaleźć w FAQ'u.

Odczytaj z rejestru
z klucza:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\

zmienna: Desktop

Jest jednak o wiele łatwiejszy sposób:

uses ShlObj;

function GetFolderPath(Folder: Integer): string;
var
  Path: array[0..MAX_PATH] of Char;
begin
  SHGetSpecialFolderPath(0, Path, Folder , False);
  Result := Path;
end;

A potem tylko:

GetFolderPath(CSIDL_DESKTOPDIRECTORY);

Dzięki za pomoc :)

5sek w FAQ:
http://4programmers.net/faq.php/id=435