Так это же с помощью обычного WinExec делается... И никаких дополнительных компонентов не надо.

[code:1] Add(MainForm,6761520,42,119)
{
Left=20
Top=105
link(onCreate,999443:doConsoleExec,[])
}
Add(WinExec,999443,147,140)
{
FileName="subst S: C:windows"
Point(doConsoleExec)
}

[/code:1]