ExitWindows

ivank · Отправлено: **17:55, 11-07-2002** | #2

MF CAP
Как ни странно, но у меня всё работает... Правда Win2k, но это по идее это не имеет значения.

MF CAP · Отправлено: **18:51, 11-07-2002** | #3

наверно всетаки винда.....пора сносить

Guest · Отправлено: **00:39, 13-08-2002** | #4

Цитата:

допустим я пишу :
ExitWindowsEx(EWX_POWEROFF,1);
или EWX_SHUTDOWN то винда не отрубается а начинает постоянно входить сама в себя появляется приглашение о входе итд и все это буде продолжаться пока совсем не ребутнусь... Сижу под 98ми компилю по Делфи 6 Обьясните плиз что не так?

Поставь WIN2000 и Delph5 и будет все пучком....по крайней мере у меня все работает....

ivank · Отправлено: **09:27, 13-08-2002** | #5

Guest
Очень интересно, как компилятор может повлиять на работу апишной функции? Или это было сказано к тому что у вас "всё пучком"?

Besso · Отправлено: **23:15, 13-04-2003** | #6

Повлиять на работу апишной функции? Запросто !
unit ActiveX (D6):

tagREGKIND = (REGKIND_DEFAULT, REGKIND_REGISTER, REGKIND_NONE);
TRegKind = tagREGKIND;

function LoadTypeLibEx(szFile: POleStr; regkind: TRegKind; out tlib: ITypeLib): HResult; stdcall;

и cмотрите что выходит:
Sizeof(TRegKind) = 1 - следовательно компилятор забивает регистер AX, а не EAX - в итоге в EAX передаётся невесть что
Так что, MF CAP
a) проверьте описание функции
б) опишите функцию и константы альтернативно
в) дизассемблируйте вызов функции, убедитесь что передаются ИМЕННО ВАШИ ПАРАМЕТРЫ

в моём примере помогло дизассемблирование с последующим альтернативным описанием