On Sat, May 4, 2013 at 8:47 AM, silvioprog <silviop...@gmail.com> wrote:
> repeat >> if Socket.CanRead(timeout) then >> begin >> insock:=Socket.Accept; >> if insock<>-1 then >> //start working with insock >> else >> //deal with error >> end; >> until ThreadTerminated; >> >> Ludo > > > Thank you! > If you success, tell us, i must fix my sockets too :) -- I am using last revision of Lazarus, FPC 2.6 on Windows XP SP3 Best Regards Zaher Dirkey
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
