On Sat, May 4, 2013 at 8:47 AM, silvioprog <[email protected]> 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 - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-pascal
