Netsh в TMemo

Всем доброго [утра:дня:вечера:ночи] Набросал программку на Delphi. Функционал: вкл\выкл сетевых подкл. Ренэйм сетевых подкл. Всё срабатывает, НО! Есть одно но, ПО при выполнении команды netsh через процедуру, которая проводит команды командного процессора через TMemo, просто виснет намертво. В ОЗУ остаётся висеть netsh.exe. Пример кода выполнения netsh:

RunDosInMemo('netsh interface set interface name="'+PChar(Edit2.Text)+'"newname="'+PChar(Edit3.Text)+'"', Memo1);   RunDosInMemo('exit', Memo1);

Как это победить?