Jump to content

Denzil Collopen

Members
  • Content Count

    1
  • Joined

  • Last visited

Posts posted by Denzil Collopen


  1. Hi,

    I'm having a problem installing component NetCom7.dpk on Delphi XE5

     

    Error on following line : if not ReadableAnySocket([Line.Handle], aTimeout) then

     

    [dcc32 Error] ncSockets.pas(690): E2010 Incompatible types: 'TSocketHandleArray' and 'Set'

     

     

    From the unit ncSockets.pas and below is the function:

     

    function TncCustomTCPClient.Receive(aTimeout: Cardinal): TBytes;
    var
    BufRead: Integer;
    begin
    if UseReaderThread then
    raise ECannotReceiveIfUseReaderThread.Create(ECannotReceiveIfUseReaderThreadStr);

    Active := True;

    if not ReadableAnySocket([Line.Handle], aTimeout) then
    begin
    SetLength(Result, 0);
    Exit;
    end;

    BufRead := TncLineInternal(Line).RecvBuffer(ReadBuf[0], Length(ReadBuf));
    Result := Copy(ReadBuf, 0, BufRead)
    end;

    ncSockets.pas

    ncLines.pas

×