delphi中间件

摘要： TatPascalScripter组件执行脚本的Pascal语法。Pascal语法支持：•begin .. end•procedure and function•if .. then .. else•for .. to .. do .. step•while .. do•repeat . 阅读全文

摘要： Scripter工作室是把脚本能力加到你的应用程序的一套的Delphi/C++Builder部件。Scripter工作室能使你的最终用户使用可视化工具书写和执行自己的脚本。包含的组件有： TatPascalScripter － 非视觉组件，执行Pascal语法的脚本。 TatBasicScripte 阅读全文

摘要： {*******************************************************}{ }{进制转换 }{ }{ cxg 2008-08-23 08:52:16 }{ }{*******************************************************}unit uStrUnit;interfaceuses SysUtils, StrUtils, Windows, Classes, WinSock, Forms, Controls, Dialogs;const cHexBinStrings: array[0..15] of strin 阅读全文

摘要： Delphi关于多线程同步的一些方法 线程是进程内一个相对独立的、可调度的执行单元。一个应用可以有一个主线程，一个主线程可以有多个子线程，子线程还可以有自己的子线程，这样就构成了多线程应用了。由于多个线程往往会同时访问同一块内存区域，频繁的访问这块区域，将会增加产生线程冲突的概率。一旦产生了冲突，将会造成不可预料的结果（该公用区域的值是不可预料的）可见处理线程同步的必要性。 注意：本文中出现的所有代码都是用DELPHI描述的，调试环境为Windows me ，Delphi 6。其中所涉及的Windows API函数可以从MSDN获得详细的文档。 首先引用一个实例来引出我们以下的讨论，... 阅读全文

摘要： ListView使用中的一些要点。以下以一个两列的ListView为例。 →增加一行：with ListView1 do begin ListItem:=Items.Add; ListItem.Caption:='第一列内容'; ListItem.SubItems.Add('第二列内容'); end; →清空ListView1：ListView1.Items.Clear; →得到当前被选中行的行的行号以及删除当前行：For i:=0 to ListView1.Items.Count-1 Do If ListView1.Items[i].Selected then 阅读全文

摘要： 用idTCPServer，客户端接上来时，如何取得客户端的IP？ IP:=AThread.Connection.Binding.PeerIP;Port:=AThread.Connection.Binding.PeerPort; 尝试解答你的疑问：问题一：在Form1中放入IDTCPServer控件， 阅读全文

摘要： PChar 串是以 Null 结束的, 或者说是以 "空字节" 结束的;PChar 串见到 "空字节" 就认作结束了;"空字节" 在 Delphi 中可以用 #0 或 Chr(0) 来表示.--------------------------------------------------------------------------------//举例:var pc: PChar;begin pc := 'ABCD' + #0 + 'EFGHIJKLMNOPQRSTUVWXYZ'; ShowMess 阅读全文

摘要： 1、# 后面跟一个字符编码可以表示这个字符, 字符编码可以用十进制或十六进制表示;譬如字符 "A" 的编码是 65(十进制) 或 $41(十六进制).ANSII 编码表参见: http://www.cnblogs.com/del/archive/2007/12/07/987071.html--------------------------------------------------------------------------------var c: AnsiChar;begin c := #65; ShowMessage(c); {A} c := #$41; Sh 阅读全文

摘要： 一个全局变量可以初始化, 如果你不主动初始化, 也会被自动初始化;一个局部变量不能被初始化, 虽然你不能主动初始化, 但它会被赋予一个随机值.--------------------------------------------------------------------------------unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) proc 阅读全文

摘要： DupeString重复字串 与StringOfChar的区别 StringOfChar 是反复 "字符" 成 "字符串" 的函数;DupeString 是反复 "字符串" 成 "新字符串" 的函数;StringOfChar 来自 System 单元, 可以直接使用;DupeString 来自 StrUtils 单元, 使用时需要 uses StrUtils;如果仅仅是反复 "字符", 当然应该用 StringOfChar , 它是用汇编代码实现的, 速度会稍好一些.var p: PChar;b 阅读全文