Pasta do Windows

Delphi

11/05/2004

Alô pessoal,

Como descubro a pasta onde está instalado o windows ao rodar uma aplicação?

Agradeço.


Rnildo

Rnildo

Curtidas 0

Respostas

Fabio.hc

Fabio.hc

11/05/2004

Tente assim:

Function PastaWindows : String;
Var
Buffer : Array[0..144] of Char;
Begin
   GetWindowsDirectory(Buffer,144);
   Result := StrPas(Buffer);
End;



GOSTEI 0
POSTAR