这两个函数
function app_path1:string
function socket_rec_line1(socket1:TCustomWinSocket timeout1:integer crlf1:string=#13#10):string
实际上是我的一个公用单元中的函数,大家应该养成建立自己的公用单元的习惯。
socket_rec_line1函数中用了唐晓峰大侠的coolmail中的办法:只是简单的一个一个字节收取,找到结束
标志后就算收完一行了,大家实际应用时可能应该找更好的办法。
这个程序的目的是:Flashget在下载象51.net系列[如我的clq.51.net]中的程序时,会因为这些网站上的
自定义错误页面而导致下载的文件出错,具体见“大富翁”上的
“http://www.delphibbs.com/delphibbs/dispq.asp?lid=1170159”
虽然这是一个演示程序,不能下载地址转向的东东。但对于固定地址文件的下载已经很不错了,我的公司
不能装多线程的东东我一直用这个下载我要的大文件,“大富翁”200多M的离线数据这是用它下载的。
标签:
function
TCustomWinSocket
socket_rec_line
app_path
上传时间:
2016-01-10
上传用户:hakim