P－Blog

       今天上班刚坐下来的时候，脑子里还是空白的，看了下网页然后就打开俺桌面上那一堆的开发工具开始写那套还未完成的OA。过了阵子，有同事跑来说C/S单用ADOQUERY没想到啥好办法把返回的所有数据和字段名都取到MEMO控件中，于是乎俺就跑到网上瞎忙活了一阵子，看了看人家写的，好像自己有点不习惯，就修改了一下，用的是最笨的办法，但是还是比较实用，需要的用的朋友直接COPY过去就OK了。{ 

Author：Perl    在用INDY写网络程序的时候，因为在IDTCPCLIENT中是没有EXECUTE事件去接收IDTCPSERVER发送过来的数据的，最笨的办法就是在CLIENT做一个TIMER循环接收数据，但是这样有两个坏处：    一、会掉包。    二、要处理一些特殊字符。本文就是针对解决这个问题给出一个比较好的解决办法。            例如在CLIENT的TIMER中，通

Author：Perl     今天上班，同事跟俺说觉得DELPHI创建窗体的代码每次都要打两三行特麻烦，叫俺给他写个创建窗体的函数，好，那就写吧，用了五分钟时间写了个，中间因为类的继承搞错了花了我点时间，呵呵～～      以后要创建窗体一行代码就完了，自己也省力，同事也省力，哈哈～～////////////////////////////////////////////////////////

今天在瞎忙活，都不知道搞啥，正好跟朋友聊天讲到有钱与没钱的区别，俺就使出生平所学给它来个大杂烩，呵呵～～/////////////// C/////////////////////////////if (我有钱){while 有钱{Printf(%s,"无限的假期");Printf(%s,"无数的妞")Printf(%s,"干他Y的，还打工！自己做老板");  if (我破产)  {    Bre