Directorios window.
 

Saludos a todos. Me gustaría saber como puedo usar los directorios tipo %Windows% o %root% . Sé que hay funciones en windows.dcu pero solo para algunos de los anteriores...

Que es exactamente lo que deseas hacer

Crear directorios con CreateDirectory. Por ejemplo, si quiero poner en mis documentos una carpeta llamad mis juegos:

Código Delphi [-]
CreateDirectory(%User%+'/Mis documentos/Mis juegos');

Se me ocurre algo como esto:

Código Delphi [-]
function InsertarVariables(Str: String): String;
var
  i: Integer;
  EnvBlock, P: PChar;
begin
  Result:= Str;
  EnvBlock:= GetEnvironmentStrings;
  if EnvBlock <> nil then
  try
    with TStringList.Create do
    try
      P:= EnvBlock;
      while P^ <> #0 do
      begin
        if Pos('=',String(P)) > 1 then
          Add(String(P));
        inc(P,StrLen(P)+1);
      end;
      for i:= 0 to Count - 1 do
        Result:= StringReplace(Result,'%'+ Names[i] +'%', ValueFromIndex[i],
          [rfIgnoreCase,rfReplaceAll]);
    finally
      Free;
    end;
  finally
    FreeEnvironmentStrings(EnvBlock);
  end;
end;

// Por ejemplo
ShowMessage(InsertarVariables('%Windir%\miprograma.exe'));