indy 10终于随着Delphi2005发布了,不过indy套件在我的印象中总是复杂并且BUG不断,说实话,不是看在他一整套组件的面子上,我还是喜欢VCL原生的Socket组件,简洁,清晰.Indy9发展到了indy10几乎完全不兼容,可叹啊.言归正传.在使用IdTCPServer组件的时候发现了他的漏洞,他的OnConnec,OnExecute,OnDisconnect等事件是在其他线程中执行的,通常情况下这没有问题,但是在特殊的情况下会造成问题,如果其他部分的程序写得有问题就会出现漏洞.

delphi checklistbox用法 在Delphi中checklistbox中高亮选中(不论是否Checked)能够进行操作么?删除,上下移动等等 删除:CheckListBox.DeleteSelected; 上下移: CheckListBox.Items.Move 删除用 CheckListBox1.Items.Delete(Index); 上下移动用 CheckListBox1.Items.Move(CurrentIndex,NewIndex); //在项目中添加字符串(子项目的最

Delphi TStringHelper用法详解 (2013-08-27 22:45:42) 转载▼ 标签: delphi_xe5 it 分类: Delphi Delphi XE4的TStringHelper,对操作字符串进一步带来更多的方法,使用这些方法才可以实现跨平台的代码. System.SysUtils.TStringHelper 大小写转换:-------------------------------------------------------------------------

转自: http://blog.163.com/you888@188/blog/static/67239619201472365642633/ delphi TStringList 用法详解 2014-08-23 18:56:42|  分类: delphi xe6以上|举报|字号 订阅     下载LOFTER我的照片书  |     delphi TStringList 用法详解2014-5-2阅读63 评论0 delphi TStringList 用法详解 //TStringList 常用方

delphi webbrowser用法集锦 (2012-05-13 08:29:00) 标签: it 分类: 软件_Software WebBrowser1.GoHome; //到浏览器默认主页 WebBrowser1.Refresh; //刷新 WebBrowser1.GoBack; //后退 WebBrowser1.GoForward; //前进 WebBrowser1.Navigate('...'); //打开指定页面 WebBrowser1.Navigate('about:blank')

用法:uses Superobject, Sperjsondelphi里有json单元. procedure TForm2.SuperObjectClick(Sender: TObject); var str: string; jo1: ISuperObject; begin jo1 := SO('{}');// 初始化 with jo1.O['recieve'] do begin S['status'] := 'OK'; S['module'] := 'Windows'; S['act' ]

StringReplace用法 在开发过程中,有时候我们需要对字符串进行替换操作,屏蔽或者和谐某些字符,可使用Delphi自带的函数StringReplace函数. 通过代码进行说明: //函数原型 function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string; //参数说明: //S: 源字符串 //OldPattern: 想要替换的字符串 //NewPattern:

一.IDHTTP的基本用法 IDHttp和WebBrowser一样,都可以实现抓取远端网页的功能,但是http方式更快.更节约资源,缺点是需要手动维护cook,连接等 IDHttp的创建,需要引入IDHttp procedure InitHttp(); begin http := TIdHTTP.Create(nil); http.ReadTimeout := ; http.OnRedirect := OnRedirect; http.Request.Accept := 'image/gif,

在Delphi中checklistbox中高亮选中(不论是否Checked)能够进行操作么?删除,上下移动等等 删除:CheckListBox.DeleteSelected; 上下移: CheckListBox.Items.Move   删除用 CheckListBox1.Items.Delete(Index); 上下移动用 CheckListBox1.Items.Move(CurrentIndex,NewIndex); //在项目中添加字符串(子项目的最后一位接着添加)      CheckL

一.IDHTTP的基本用法  IDHttp和WebBrowser一样,都可以实现抓取远端网页的功能,但是http方式更快.更节约资源,缺点是需要手动维护cook,连接等  IDHttp的创建,需要引入IDHttp  procedure InitHttp();  begin     http := TIdHTTP.Create(nil);      http.ReadTimeout := 30000;      http.OnRedirect := OnRedirect;      http.Re

今天再细研究了一下Treeview的用法,网上虽然总结了很多,但是还是有很多节点没有讲到了,也给使用中遇到很多问题.特地总结一下: 1.概念 Treeview用于显示按照树形结构进行组织的数据.Treeview控件中一个树形图由节点(TreeNode)和连接线组成.TtreeNode是TTreeview的基本组成单元. 一个树的节点又包含文本(Text)和数据(Data).Text为String类,Data则为无定形指针(Untyped   Pointer),可以指向一个与节点相联系的数据结构.

Treeview用于显示按照树形结构进行组织的数据.         Treeview控件中一个树形图由节点(TreeNode)和连接线组成.TtreeNode是TTreeview的基本组成单元.     一个树的节点又包含文本(Text)和数据(Data).Text为String类,Data则为无定形指针(Untyped   Pointer),     可以指向一个与节点相联系的数据结构.         每一个节点下子节点形成这一节点的Items属性,当前节点有一个唯一的Index(Tree

Delphi中的THashedStringList对象 Delphi在在IniFiles 单元中定义了THashedStringList类: THashedStringList = class(TStringList) private     FValueHash: TStringHash; FNameHash: TStringHash; FValueHashValid: Boolean; FNameHashValid: Boolean; procedure UpdateValueHash; p

1.放个TdxBarManager在窗体上2.放个TdxBarDockControl在panel上,把它的BarManager属性设置为dxBarManager13.双击dxBarManager1,新建个工具条,把工具条的DockControl设置为dxBarDockControl1 这个功能确实实现了,不过就是TdxBarManager里带的checkBox 不好控制: 明明把 True点成了False,但是焦点一离开,就恢复原样: ------------------------------

源:http://www.cnblogs.com/zhangzhifeng/archive/2011/10/12/2208640.html MaskEdit是用来建立编辑框的,但它与Edit编辑框可以输入任意字符不同,MaskEdit可以限制用户只能按照既定的输入格式输入.掩码编辑框(MaskEdit)是一种特殊的编辑框.使用它可以设计出许多复杂的输入格式.在选用MaskEdit之后,需要为它设计一个输入格式.方法如下: 首先在窗体上将MaskEdit选中,在对象查看器(Object Inspe

unit Unit1; interface usesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ComCtrls; type TForm1 = class(TForm)    Button1: TButton;    Edit1: TEdit;    Edit2: TEdit;    procedure Button1Click(Sender: TObje

1  连接远程服务器procedure Connect(AAutoLogin: boolean; const ATimeout: Integer);2  改变目录procedure ChangeDir(const ADirName: string);3  下载procedure Get(const ASourceFile: string; ADest: TStream; AResume: Boolean); overload;procedure Get(const ASourceFile: st

第四节:多线程类的改进   1.需要改进的地方   a) 让线程类结束时不自动释放,以便符合 delphi 的用法.即 FreeOnTerminate:=false; b) 改造 Create 的参数,让它适合访问 COM 组件.如:在线程时空中能够创建 TAdoConnection; c) 设计一个接口能将一个过程( procedure )塞到线程时空中去运行的功能,这样,不必每次重载 Execute 函数. d) 设计一个输出信息的接口   下一节,将讲解如何用多个线程同时执行相同的任务  

cxgrid强大用法 (2012-07-25 14:09:42) 转载▼ 标签: delphi cxgrid 用法 强大 杂谈 分类: Delphi cxGrid功能强大,适合做企业级的复杂查询.非常方便.但是对其用法介绍的并不多,在此总结他人的使用经验和自己的一点小经验,供大家参考. (1)动态设置显示格式procedure SetDisplayFormat(ACtrlData: TClientDataSet;  TbView: TcxGridDBTableView);var  i: inte

InstallShield脚本语言是类似C语言,利用InstallShield的向导或模板都可以生成基本的脚本程序框架,可以在此基础上按自己的意愿进行修改和添加.     一.基本语法规则      1.变量      BOOL 布尔型 值为TRUE(1)或FALSE(0)      CHAR 字符型 一字节长的(8bit)的字符      HWND 窗口句柄 用来存放窗口句柄      INT 整型 两字节长的整数      LIST 列表型 指向InstallShield列表,用ListCr

查找不重复数据 DISTINCT 查询日期 在access中格式是yyyy-mm-dd,Query执行的语句中用‘#’+Formatdata(‘yyyy-mm-dd’,date)+‘#’ SQL运算符 取模%,MOD() +,-,*,% 比较运算(true,false,Unknow) 比较运算(<,>,<>,!=) 逻辑运算(And,OR,Not) 为提高效率一般不用OR改用IN ||连接,CONCAT Like通配符%,_ SQL中排序大写字母总在小写的后面,不论是在ASCII,