這兩個函數
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的離線數據這是用它下載的。

大家對源碼有什么不明白的請在“http://www.delphibbs.com/delphibbs/dispq.asp?lid=1170159”中提
出。         

--------------------------------------------------------------------------------------------
本程序能改正flashget的這個bug是因為我們用http的頭信息中是否包含
“Content-Range: bytes 533263-533263/565691”
這樣的符號來判斷服務器返回的是否是我們要的文件信息。而flashget則不是這樣的，如果哪位網友能
通知flashget的作者改正這個bug我將感激不盡！我與其作者聯系過，但他只回了一封信，問題并沒有解
決。:( 如果有網友發現flashget新版本中解決了這個問題，也請您告訴我一聲，先謝謝您了！
--------------------------------------------------------------------------------------------


                                                       clq
                                                       or
                                                       real_clq
                                                       
                                                       2002.10.8