Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Странная ошибка :(


Piter ©   (2005-08-19 22:19:00) 

Делаю select, он возвращает -1, вызываю:

Res := WSAGetLastError;

Возвращается код ошибки 87
Чего это такое?!

Функция:

function WSAErrorMessage(ErrorCode: Integer): string;
var
 Buffer: array[0..255] of Char;
var
 Len: Integer;
begin
 Len := FormatMessage(FORMAT_MESSAGE_FROM_HMODULE or FORMAT_MESSAGE_IGNORE_INSERTS or
   FORMAT_MESSAGE_ARGUMENT_ARRAY, Pointer(GetModuleHandle('wsock32.dll')),
   ErrorCode, 0, Buffer,
   SizeOf(Buffer), nil);
 while (Len > 0) and (Buffer[Len - 1] in [ #0..#32, '.']) do Dec(Len);
 SetString(Result, Buffer, Len);
end;


ничего преобразовать не может, по данному коду ошибки возвращает пустую строку.

Как блин определить в чем дело?


Piter   (2005-08-20 00:19:00) [1]

Вроде получается, что 87 это  - "Неправильно указан параметр".

Но какой параметр? Блин, вроде все верно...


Piter   (2005-08-19 23:18:00) [2]

Турист   (19.08.05 22:47) [1]
WSABASEERR              = 10000;


я про тоже. Странный какой-то код: 87

нужно использовать SysErrorMessage

пробовал. Тоже ничего не дает.


Турист   (2005-08-19 22:47:00) [3]

WSABASEERR              = 10000;

Наверно, нужно использовать SysErrorMessage


Наверх

Титульная страница Поиск, карта сайта Написать письмо