Форум: "WinAPI";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Вниз
ZwShutdownSystem (из ntdll.dll) - самый быстрый вариант, даже не Найти похожие ветки
← →
adnry (2004-03-16 10:03) [0]как написать єту функцию под delphi, у меня єсть исходник на С++ но я там ничего не понимаю.
← →
adnry (2004-03-16 10:03) [0]как написать єту функцию под delphi, у меня єсть исходник на С++ но я там ничего не понимаю.
← →
BiN © (2004-03-16 10:07) [1]type
NTSTATUS = DWORD;
SHUTDOWN_ACTION = byte;
const
ShutdownNoReboot = 0;
ShutdownReboot = 1;
ShutdownPowerOff = 2;
function ZwShutdownSystem(Action:SHUTDOWN_ACTION):NTSTATUS;stdcall;
begin
ZwShutdownSystem(ShutdownPowerOff);
end;
← →
BiN © (2004-03-16 10:07) [1]type
NTSTATUS = DWORD;
SHUTDOWN_ACTION = byte;
const
ShutdownNoReboot = 0;
ShutdownReboot = 1;
ShutdownPowerOff = 2;
function ZwShutdownSystem(Action:SHUTDOWN_ACTION):NTSTATUS;stdcall;
begin
ZwShutdownSystem(ShutdownPowerOff);
end;
← →
adnry (2004-03-16 13:00) [2]єсли можна пример подкинте!!!!!!!
← →
adnry (2004-03-16 13:00) [2]єсли можна пример подкинте!!!!!!!
← →
BiN © (2004-03-16 13:06) [3]begin
ZwShutdownSystem(ShutdownPowerOff);
end;
это и был пример
← →
BiN © (2004-03-16 13:06) [3]begin
ZwShutdownSystem(ShutdownPowerOff);
end;
это и был пример
← →
adnry (2004-03-16 13:23) [4]не хочет работать [Warning] Project1.dpr(19): Return value of function "ZwShutdownSystem" might be undefined
← →
adnry (2004-03-16 13:23) [4]не хочет работать [Warning] Project1.dpr(19): Return value of function "ZwShutdownSystem" might be undefined
← →
MU (2004-03-16 13:26) [5]Удалено модератором
Примечание: Offtopic
← →
MU (2004-03-16 13:26) [5]Удалено модератором
Примечание: Offtopic
← →
BiN © (2004-03-16 13:29) [6]>>adnry
такими темпами скоро в орешник попадешь.
И вообще, используй ExitWindowsEx
← →
BiN © (2004-03-16 13:29) [6]>>adnry
такими темпами скоро в орешник попадешь.
И вообще, используй ExitWindowsEx
← →
Andry2 (2004-03-16 17:26) [7]ExitWindowsEx - плохо работаєт, а ZwShutdownSystem суперски , уменя єсть исходник С++ і сам екзешник, но очень нужна на Delphi, я вижу тут никто не знаєт как ето зделать. Хто сумеєт киньте поштой, помогите бедному админу!!!!
← →
Andry2 (2004-03-16 17:26) [7]ExitWindowsEx - плохо работаєт, а ZwShutdownSystem суперски , уменя єсть исходник С++ і сам екзешник, но очень нужна на Delphi, я вижу тут никто не знаєт как ето зделать. Хто сумеєт киньте поштой, помогите бедному админу!!!!
← →
BiN © (2004-03-16 17:38) [8]...я вижу тут никто не знаєт как ето зделать
куда уж нам уж.
а [1] - не ответ что ли
← →
BiN © (2004-03-16 17:38) [8]...я вижу тут никто не знаєт как ето зделать
куда уж нам уж.
а [1] - не ответ что ли
← →
Andry2 (2004-03-16 19:46) [9]если ответ почему не пашет, может у меня рука кривая, то помогити исправить.
← →
Andry2 (2004-03-16 19:46) [9]если ответ почему не пашет, может у меня рука кривая, то помогити исправить.
← →
Gero © (2004-03-16 22:39) [10]> а [1] - не ответ что ли
Что ж это за ответ, если оно "не хочет работать" [4]
> может у меня рука кривая, то помогити исправить
Это Вам к хирургу надо :)
← →
Gero © (2004-03-16 22:39) [10]> а [1] - не ответ что ли
Что ж это за ответ, если оно "не хочет работать" [4]
> может у меня рука кривая, то помогити исправить
Это Вам к хирургу надо :)
← →
nikkie © (2004-03-16 22:56) [11]издеваетесь над мальчиком... а он ведь искренне скопировал код...
>Andry2
в [1] пропущено ключевое слово external и еще чуть-чуть. почитай хелп про него. а в следующий думай хоть немного, когда код копируешь.
не хочет работать [Warning] Project1.dpr(19): Return value of function "ZwShutdownSystem" might be undefined
ну если так сильно мешает, напиши
Result := ZwShutdownSystem(ShutdownPowerOff);
:))
← →
nikkie © (2004-03-16 22:56) [11]издеваетесь над мальчиком... а он ведь искренне скопировал код...
>Andry2
в [1] пропущено ключевое слово external и еще чуть-чуть. почитай хелп про него. а в следующий думай хоть немного, когда код копируешь.
не хочет работать [Warning] Project1.dpr(19): Return value of function "ZwShutdownSystem" might be undefined
ну если так сильно мешает, напиши
Result := ZwShutdownSystem(ShutdownPowerOff);
:))
← →
DrPass © (2004-03-16 23:18) [12]>nikkie
> ну если так сильно мешает, напиши
> Result := ZwShutdownSystem(ShutdownPowerOff);
За такие шуточки в гестапо принимали без экзаменов :)
← →
DrPass © (2004-03-16 23:18) [12]>nikkie
> ну если так сильно мешает, напиши
> Result := ZwShutdownSystem(ShutdownPowerOff);
За такие шуточки в гестапо принимали без экзаменов :)
← →
BiN © (2004-03-17 09:33) [13]Gero © (16.03.04 22:39) [10]
... Что ж это за ответ, если оно "не хочет работать"
Вопрос был о синтаксисе функции - в [1] на этот вопрос представлен полный ответ.
О статическом импорте функций из библиотек пока что никто не спрашивал.
← →
BiN © (2004-03-17 09:33) [13]Gero © (16.03.04 22:39) [10]
... Что ж это за ответ, если оно "не хочет работать"
Вопрос был о синтаксисе функции - в [1] на этот вопрос представлен полный ответ.
О статическом импорте функций из библиотек пока что никто не спрашивал.
← →
EXE7 (2004-03-17 10:38) [14]export function ИЗ Dll
откуда делфя знает что у тебя функция есть такая?
а может dll еще что-то есть,искать по всем dll
она не будет
или прописана в WinUndocFunct.pas?
kiSystemService ;)
← →
EXE7 (2004-03-17 10:38) [14]export function ИЗ Dll
откуда делфя знает что у тебя функция есть такая?
а может dll еще что-то есть,искать по всем dll
она не будет
или прописана в WinUndocFunct.pas?
kiSystemService ;)
← →
adnry2 (2004-03-17 12:58) [15]Удалено модератором
Примечание: Создание пустых сообщений
← →
adnry2 (2004-03-17 12:58) [15]Удалено модератором
Примечание: Создание пустых сообщений
← →
Alexander666 © (2004-03-18 04:14) [16]Вместо
function ZwShutdownSystem(Action:SHUTDOWN_ACTION):NTSTATUS;stdcall;
пиши
function ZwShutdownSystem(Action:SHUTDOWN_ACTION):NTSTATUS;stdcall;external "ntdll.dll";
← →
Alexander666 © (2004-03-18 04:14) [16]Вместо
function ZwShutdownSystem(Action:SHUTDOWN_ACTION):NTSTATUS;stdcall;
пиши
function ZwShutdownSystem(Action:SHUTDOWN_ACTION):NTSTATUS;stdcall;external "ntdll.dll";
← →
andry2 (2004-03-18 11:48) [17]Alexander666 уже ближе к дело говорит, но там ищо надо наверноє і права получить, бо не хочет сразу без прав стартовать!!!!! Или я ошибаюсь!!!!!!!1
← →
andry2 (2004-03-18 11:48) [17]Alexander666 уже ближе к дело говорит, но там ищо надо наверноє і права получить, бо не хочет сразу без прав стартовать!!!!! Или я ошибаюсь!!!!!!!1
← →
andry2 (2004-03-18 12:06) [18]Всем большоє спасибо заработало, я подставил ету функцию взамен
ExitWindowsEx в примерах для NT и турбо-ядро NT за 1 сек. пошло спать. Хто захочет можу дать пример. Всьотаки єсь на свети ГУРУ (Alexander666). Єслиб увидил поставилби ящик пива!!!
← →
andry2 (2004-03-18 12:06) [18]Всем большоє спасибо заработало, я подставил ету функцию взамен
ExitWindowsEx в примерах для NT и турбо-ядро NT за 1 сек. пошло спать. Хто захочет можу дать пример. Всьотаки єсь на свети ГУРУ (Alexander666). Єслиб увидил поставилби ящик пива!!!
← →
Alexander666 © (2004-03-18 16:23) [19]Спасибо, я не пью, если честно :-)
← →
Alexander666 © (2004-03-18 16:23) [19]Спасибо, я не пью, если честно :-)
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Память: 0.53 MB
Время: 0.067 c
