These two functions
function app_path1:string;
function socket_rec_line1(socket1:TCustomWinSocket;timeout1:integer;crlf1:string=#13#10):string;
It's actually a function in one of my public units. You should develop the habit of building your own public units.
The socket_rec_line1 function uses the method in Tang Xiaofeng's coolmail: it simply collects bytes one by one. After finding the end mark, it is considered that the line has been collected. In actual application, you should probably find a better method.
The purpose of this program is: when flashget downloads programs like the 51.net series [such as my clq.51.net], it will cause errors in the downloaded files due to the custom error pages on these websites. For details, see "Big "Rich Man" on
"http://www.delphibbs.com/delphibbs/dispq.asp?lid=1170159"
Although this is a demo program, the download address cannot be redirected. But it is very good for downloading files with fixed addresses. My company cannot install multi-threaded stuff. I have been using this to download the large files I want. I used it to download more than 200 MB of offline data in "Monopoly".
If you have any questions about the source code, please submit it at "http://www.delphibbs.com/delphibbs/dispq.asp?lid=1170159".
-------------------------------------------------- ------------------------------------------
This program can correct the flashget bug because we use whether the http header information contains
"Content-Range: bytes 533263-533263/565691"
Such symbols are used to determine whether the server returns the file information we want. This is not the case with flashget. If any netizen can inform the author of flashget to correct this bug, I will be grateful! I contacted the author, but he only responded with a letter and the issue was not resolved. :( If any netizen finds that this problem is solved in the new version of flashget, please let me know. Thank you in advance!
-------------------------------------------------- ------------------------------------------
cq
or
real_clq