Fórum Como pegar a pasta MEUS DOCUMENTOS dos usuario no Win-xp 32/64, Win-7 32/64, win-8 32/64 ? #459568

Amigo, veja isso

att


var
chosenDirectory : string;
begin
// selecione o diretório
if SelectDirectory('Select a directory', 'C:\', chosenDirectory)
then ShowMessage('Chosen directory = '+chosenDirectory)
else ShowMessage('Directory selection aborted');
end;


var
options : TSelectDirOpts;
chosenDirectory : string;
begin
chosenDirectory := 'C:\'; // setar o diretório
// Ask the user to select using a completely different dialog!
if SelectDirectory(chosenDirectory, options, 0)
then ShowMessage('Chosen directory = '+chosenDirectory)
else ShowMessage('Directory selection aborted');
end;

Olá boa tarde!

Obrigado pela atenção!

Mas não é isto que queria.

Eu queria que ao entrar no sistema o mesmo já pesquisasse:

1-Qual o nome do Usuário logado ?

2-Qual o caminho da pasta Meus Documentos ?
Ex: C:\Documents and Settings\Usuário\Meus documentos (nome do usuário é USUÁRIO)

Pois preciso cria/Verificar uma pasta existe em meus documentos, sem que o usuário logado interfira.
EX: preciso cria a pasta: C:\Documents and Settings\Usuário\Meus documentos\TESTE

100+

ANT.CARLOS/SP

Consegui pegar o usuário logado!

Ai ficou + fácil pesquisar.