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

软件限时使用与注册功能的实现 众所周知，一些共享软件往往提供给使用者的是一个功能不受限制的限时使用版，在试用期内使用者可以无限制的使用软件的全部功能（只是可能会出现提示使用者注册的窗口），试用期一过部分（或全部）功能失效，要想继续使用只能向作者索取注册码（或注册文件）完成对软件的合法注册，注册后的软件将解除一切使用限制。如果您也开发出一个有价值的作品，是否也希望为自己的软件增加一个这样的功能呢？这里笔者就提供一个实现软件限时的完整代码。 　　软件启动后会首先运行本代码并从注册表HKEY_