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

IntraWeb是Delphi自带的一套Web开发框架，它由AtozedSoftware公司在2002年制作，并完美的植入Delphi7中。Intraweb同以往所有的Web开发框架相比，是一个革命性的产品，特点就是：1.完全支持所见即所得的开发方式；2.另外IntraWeb同ASP.net的WebForm的开发方式非常类似，也支持各类Server端事件，象Button的OnClick事件等等；3.可以方便的进行web程序跟踪调试排错；4.支持非常简单直观的Session支持；5.由于Intra