GetLastError

← →
SPeller © (2002-04-05 13:43) [0]

Как получить текстовое представление ошибки, код которой возвращает данная функция ??

← →
VuDZ © (2002-04-05 13:46) [1]

MSDN:
LPVOID lpMsgBuf; FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, NULL, GetLastError(), MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language (LPTSTR) &lpMsgBuf, 0, NULL ); // Process any inserts in lpMsgBuf. // ... // Display the string. MessageBox( NULL, (LPCTSTR)lpMsgBuf, "Error", MB_OK | MB_ICONINFORMATION ); // Free the buffer. LocalFree( lpMsgBuf );

← →
SPeller © (2002-04-05 13:50) [2]

Уууу... извините, VuDZ, но в Си я 0, нельзя ли на Дельфи, если не трудно?
Да... спасибо за ответ.

← →
VuDZ © (2002-04-05 14:25) [3]

LPVOID lpMsgBuf;
обявляешь просто _указатель_ на что угодно, можешь типа PChar
FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, NULL,
NULL == nil

GetLastError(), MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language
MAKELANGID определён как MAKELANGID(p, s) ((((WORD )(s)) << 10) | (WORD )(p))
Т.е. второй параметр типа слово (16 бит) сдвигается на 10 бит и потом выполняется логичиское или (OR) с первым параметром.
LANG_NEUTRAL = 0
SUBLANG_DEFAULT = 1, но это должно быть определено где то.
(LPTSTR) &lpMsgBuf, 0, NULL );

(LPTSTR) &lpMsgBuf - указатель на указатель :>
MessageBox( NULL, (LPCTSTR)lpMsgBuf, "Error", MB_OK | MB_ICONINFORMATION );
Вывод сообщения ил ещё что-то

// Free the buffer. LocalFree( lpMsgBuf );
Удаление буфера. Лучше через API.

А еще проще :
SysErrorMessage(GetLastError),
модуль SysUtils

Thanks All !!!

GetLastError Найти похожие ветки