Ошибка 10014

  • Автор темы Jeefo
  • Дата начала
Статус
Закрыто для дальнейших ответов.
J

Jeefo

#1
Начал недавно разбираться с сокетами в Delphi. Использую TServerSocket/TClientSocket, Delphi 7. И вот, столкнулся с следующей ошибкой. Есть процедура сервера, которая передает клиенту некие данные:

Код:
type
TPackTypeEnum = (ptNone, ptAuth, ptSetUserList, ptMsg);

procedure TMainForm.SendPack(Socket: TCustomWinSocket; PackType: TPackTypeEnum; Buf: Pointer; Length: Integer);
begin
Socket.SendBuf(PackType, SizeOf(TPackTypeEnum));
Socket.SendBuf(Length, SizeOf(Integer));
Socket.SendBuf(Buf^, Length);
end;
И в определенном месте я использую эту процедуру следующим образом:

Код:
SendPack(Socket, ptAuth, PChar('Failed'), Length('Failed')+1);
При обычном прогоне программы все работает как часы. Но при пошаговой отладке проги, на строке Socket.SendBuf(Buf^, Length); возникает ошибка 10014. Возникли 2 вопроса: что тут не так? и почему ошибка происходит только при отладке?
 
Статус
Закрыто для дальнейших ответов.