Автор Akell@ задал вопрос в разделе Другие языки и технологии
Как изменит системную переменную Path с помощью delphi? и получил лучший ответ
Ответ от MMM_Corp[гуру]
Для этого используется API функция GetEnvironmentVariable.
GetEnvironmentVariable возвращает значения:
В случае удачного выполнения функции, возвращаемое значение содержит количество символов, хранящихся в буфере, не включая последнего нулевого.
Если указанная переменная окружения для текущего процесса не найдена, то возвращаемое значение равно нулю.
Если буфер не достаточного размера, то возвращаемое значение равно требуемому размеру для хранения строки значения и завершающего нулевого символа.
function GetDOSEnvVar(const VarName: string): string;
var
i: integer;
begin
Result := '';
try
i := GetEnvironmentVariable(PChar(VarName), nil, 0);
if i > 0 then
begin
SetLength(Result, i);
GetEnvironmentVariable(Pchar(VarName), PChar(Result), i);
end;
except
Result := '';
end;
end;
ну а дальше могу и за вас сразу и функцию написать, за какихто 5-10 у. е. , обращайтесь)
ну, по exec'у вызвать set path, например.. .
регистр править.. .
бится к файлам и править их.. .
это, из серии - как выпить водки - возможностей куча, но и последствия будут.. .
т. ч. определяйтесь в ТЗ, пишите, какие ограничения и, что основное, требования.... Бум думать...