I suggest change code line #1823 (Release 38b2) in method
TBlockSocket.LimitBandwidth from:
//
sleep(x);
//
to:
//
Sleep(x Mod 10);
For Cnt := 1 To x Div 10 Do
Begin
If FStopFlag Then
Break;
Sleep(10);
End;
//
It's be best for drop "imitated very slow connections".
--
Kazantsev Alexey
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public
