Показать сообщение отдельно

Помогите с дельфином
  #1  
Старый 27.03.2010, 11:14
Axeee
Новичок
Регистрация: 27.11.2008
Сообщений: 23
Провел на форуме:
73459

Репутация: 3
Post Помогите с дельфином

Выдает ошибку константы.. при замене на реал, выдает уже на 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);
или подскажите рабочий код добавления и скрытия учетки в группу администраторы..

Последний раз редактировалось Axeee; 27.03.2010 в 11:16..