这两个函数 function app_path1:string function socket_rec_line1(socket1:TCustomWinSocket timeout1:integer crlf1:string=#13#10):string 实际上是我的一个公用单元中的函数，大家应该养成建立自己的公用单元的习惯。 socket_rec_line1函数中用了唐晓峰大侠的coolmail中的办法：只是简单的一个一个字节收取，找到结束 标志后就算收完一行了，大家实

For build this project you can use ant (www.apache.org). Before build project rename file build.properties.pattern in build.properties and set specific for your machine parameters, then start build.bat (for Windows platform) or build.sh (for Linu

delphi支持GIF第三方控件。说明如下： This a version of Anders Melander s TGIFImage ported to Delphi 7. It supports animated GIF files in Delphi 7. Note: This Delphi 7 version should also work older Delphi versions (not tested much). WARNING: Use it a

For build this project you can use ant (www.apache.org). Before build project rename file build.properties.pattern in build.properties and set specific for your machine parameters, then start build.bat (for Windows platform) or build.sh (for Linu