Como saber la ubicacion de la carpeta Windows

[Neftali [Germán.Estévez]]

También puedes probar con la API GetTempPath.

Po nun botón en un formulario y asignale este código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Buffer: array[0..MAX_PATH] of Char;
begin
  GetTempPath(SizeOf(Buffer) - 1, Buffer);
  Self.Caption := StrPas(Buffer);
end;