Ошибка 10014

Тема в разделе "Delphi - Сети", создана пользователем Jeefo, 26 окт 2008.

Статус темы:
Закрыта.
  1. Jeefo

    Jeefo Гость

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

    Код (Text):
    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;
    И в определенном месте я использую эту процедуру следующим образом:

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

Поделиться этой страницей