Fórum Usar Variável de Sistema #240780
01/07/2004
0
Boa tarde.
Como que eu faço pra descobrir o caminho da pasta arquivos de programas do pc. Por exemplo, se o windows do usuário está instalado no drive C:, o Arquivos de Programas vai estar no C:, porém se o windows estiver instalado no drive D: ou E: o ´Arquivo se Programas´, vai estar no mesmo drive do Windows. Sei que é algo como ¬Program Files Dir¬... pois a variável de Sistema do Windows é ¬Windir¬. Enfim... se alguém puder ajudar eu agradeço.
[]´s
Oberdan :!:
Como que eu faço pra descobrir o caminho da pasta arquivos de programas do pc. Por exemplo, se o windows do usuário está instalado no drive C:, o Arquivos de Programas vai estar no C:, porém se o windows estiver instalado no drive D: ou E: o ´Arquivo se Programas´, vai estar no mesmo drive do Windows. Sei que é algo como ¬Program Files Dir¬... pois a variável de Sistema do Windows é ¬Windir¬. Enfim... se alguém puder ajudar eu agradeço.
[]´s
Oberdan :!:
Oberdan
Curtir tópico
+ 0
Responder
Posts
01/07/2004
Reginaldo174
Function TForm1.ExtractWindowsDir : String;
Var
Buffer : Array[0..144] of Char;
Begin
GetWindowsDirectory(Buffer,144);
Result := (StrPas(Buffer));
showmessage(result);
End;
Esta dica funciona mesmo.
Var
Buffer : Array[0..144] of Char;
Begin
GetWindowsDirectory(Buffer,144);
Result := (StrPas(Buffer));
showmessage(result);
End;
Esta dica funciona mesmo.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)