当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: indy 10终于随着Delphi2005发布了,不过indy套件在我的印象中总是复杂并且BUG不断,说实话,不是看在他一整套组件的面子上,我还是喜欢VCL原生的Socket组件,简洁,清晰。
 

 

 ·delphi代码标准文档     »显示摘要«
    摘要:delphi代码标准文档revision 1.0.0.5编者:riceball(riceball@cq118.com) 本文主要基于“delphi development guide”一书的代码标准部分而来,编者参考其它的delphi代码标准规范,以及结合现目前delphi社区中流行的程序书写惯例,作了一些修改和裁剪,你也可以根据自己的需要进行裁剪和修改。如果你有什么建议,......
    摘要:數據庫table定義create table test(image image)delphi程序adoquery1的sql為select * from testunit unit1;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs,jpeg,stdctrl......


Delphi组件indy 10中IdTCPServer修正及SSL使用心得
上一页   ...    lyarn.thread.stop;                                                          //没完没了的调用stop过程,却不处理任何消息与同步事件

   【程序编程相关:QQ窗体自动隐藏效果探究

【推荐阅读:读书笔记:Delphi5 开发人员指南

    // dont free the yarn. the thread frees it (idthread.pas) 【扩展信息:扫雷外挂的设计与实现(五)

  end;

end;

它的上一级调用者,没完没了的判断服务线程数量,然后没完没了地调用上面这个函数,调用者原代码如下

procedure tidtcpserver.terminateallthreads;

var

  i: integer;

begin

  // todo:  reimplement support for terminatewaittimeout

  //bgo: find out why terminateallthreads is sometimes called multiple times

  //kudzu: its because of notifications. it calls shutdown when the scheduler is

  // set to nil and then again on destroy.

  if contexts <> nil then begin

    with contexts.locklist do try

      for i := 0 to count - 1 do begin

        // dont call disconnect with true. otheriwse it frees the iohandler and the thread

        // is still running which often causes avs and other.

        tidcontext(items[i]).connection.disconnect(false);


...   下一页
    摘要:newaction := taction.create(nil);newaction.actionlist := services.actionlist;newaction.caption := getmenutext();newaction.hint := display a silly dialog box;newaction.imageindex := imageindex;newactio......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE