Доброго всем времени суток!

И действительно - работает:
e:\0_All Delphi\000_ADriver\DriverInstaller>copy /Y /V regwork.sys %SystemRoot%\system32\drivers\

А не подскажете, уважаемые Гуру, какую привилегию нуно получить Delphiйскому Proect1.exe чтобы сделать то же самое? А то вот это:

Procedure FileCopy( Const SourceFilename, TargetFilename: String );
Var
S, T: TFileStream;
Begin
S := TFileStream.Create( SourceFilename, fmOpenRead or fmShareDenyWrite);
try
T := TFileStream.Create( TargetFilename, fmShareExclusive or fmCreate );
try
T.CopyFrom(S, S.Size) ;
T.Free;
S.Free;
except
on E : EFCreateError do MessageBox(0, PChar('Не удаётся записать файл'+#13+TargetFilename+#13+
E.ClassName+' ошибка с сообщением : '+E.Message), 'DriverRegister', MB_IconError);
end ;
except
on E : EFCreateError do MessageBox(0, PChar('Не удаётся прочитать файл'+#13+SourceFilename+#13+
E.ClassName+' ошибка с сообщением : '+E.Message), 'DriverRegister', MB_IconError);
End ;
End ;

FileCopy(GetCurrentDir + '\' + DrivName + '.sys', GetEnvironmentVariable('SYSTEMROOT')+'\system32\drivers');

выдаёт: отказано в доступе... Не - замутить такое:
var
s: string ;
TS: TStringList;
.....
TS:= TStringList.Create;
s:= 'copy /Y /V ' + GetCurrentDir + '\' + DrivName + '.sys %SystemRoot%\system32\drivers\';
TS.Add(s);
TS.SaveToFile(GetEnvironmentVariable('Temp') + '\tmp.cmd');

- не вопрос, вот только почему-то ни WinExec, ни WinShellExecute этот tmp.cmd запустить не могут, пока ручками (в ВинКомандёре) его не тыркнешь - тогда-то: Сопировоно файлов - 1... Мож потому, что

program DriverRegister;

{$APPTYPE CONSOLE} ???
- так вродь как не должно быть, хотя...
ОбЧем заранее благодарен.