Запомнить меня на этом копьютере
Пример программы для функции GetEnvVar.
{GetEnvVa.PAS} { Пример программы для функции GetEnvVar } Uses WinDOS; Var EnvironmentVar : PChar; Begin GetMem(EnvironmentVar, 255); EnvironmentVar:=GetEnvVar('PATH'); WriteLn('DOS - переменная PATH : '); WriteLn(EnvironmentVar); End.
Скачать getenvva.pas