Переменные окружения

[Я_и]

Задали в универе сделать системную утилиту на паскале.... Как узнать значение переменной окружения я нашел (GetEnv), а вот как ее инициализировать в ДОСе, я не знаю(((... Командна "Set ..._CMD" командной строки не работает - пишет мол "нет такой переменной"....
Помогите, пожалуйста... Заранее спасибо =)

[Niro]

что ты конкретно хочешь?
что ты подразумеваешь под

инициализировать в ДОСе

[Я_и]

Ну вот пример. Пишу в командной строке:
Set CopyCmd ...
Выдает: не найдено такой переменной окружения.
А если перед этим запустить Copy, то переменная нормально устанавливается...

Итак, я пришел к выводу, что переменная инициализируется гду-то в коде программы Copy.... Вот это я и имел в виду "инициализировать в ДОСе"

[execom]

var st : string;
begin
st:=GetEnv('ComSpec');{Вроде все работает}

что бы выполнить произвольную строку в том числе и на изменение переменных окружения можно сделать так:

Exec(GetEnv('ComSpec'), '/c тут строка');

и главное что бы работал Exec необходимо выделить памяти под потомка.. примерно так:

{$M 65000,0,0}