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

delphi语言编写的简单图书馆管理系统页面适合初学者模仿练习！-delphi

思路很简单，就是另外做个等待页面，与查询结果页面一起放到一个框架集里面，开始时框架集完全显示等待页面，而查询结果页面处于隐藏状态，查询结果页面里有改变框架集框架比例的语句，等查询完成页面生成时，改变框架比例语句就生效了，这时查询结果展示出来，等待页面被隐藏，这样就做到了显示一个等待画面的效果；由于使用了框架集，框架集不好接收查询条件，因此还得有个中间页面，专门处理查询条件，生成查询语句，再通过session传递查询语句给查询结果页面执行。-The frame assembly

delphi xe5 DataSnap Android 三层原码 只限入门学习用 和很简单 无数据库 带数据库的请到下一页面-delphi xe5 DataSnap Android