(1) 如何建立自动增长字段?
简短回答：声明为 INTEGER PRIMARY KEY 的列将会自动增长。
长一点的答案： 如果你声明表的一列为 INTEGER PRIMARY KEY，那么， 每当你在该列上插入一NULL值时， NULL自动被转换为一个比该列中最大值大1的一个整数，如果表是空的， 将会是1。 (如果是最大可能的主键 9223372036854775807，那个，将键值将是随机未使用的数。） 如，有下列表：
CREATE TABLE t1(
  a INTEGER PRIMARY KEY,
  b INTEGER
);
在该表上，下列语句
INSERT INTO t1 VALUES(NULL,123);
在逻辑上等价于：
INSERT INTO t1 VALUES((SELECT max(a) from t1)+1,123);
有一个新的API叫做 sqlite3_last_insert_rowid()， 它将返回最近插入的整数值。
注意该整数会比表中该列上的插入之前的最大值大1。 该键值在当前的表中是唯一的。但有可能与已从表中删除的值重叠。 要想建立在整个表的生命周期中唯一的键值，需要在 INTEGER PRIMARY KEY 上增加AUTOINCREMENT声明。那么，新的键值将会比该表中曾能存在过的最大值大1。 如果最大可能的整数值在数据表中曾经存在过，INSERT将会失败， 并返回SQLITE_FULL错误代码。
------------------------------- ......

      事务的功能在sqlserver中由来已久，因为最近在做一个数据同步方案，所以有机会再次研究一下它以及快照等，发现还是有很多不错的功能和改进的。这里以sqlserver2008的事务发布功能为例，对发布订阅的方式简要介绍一下操作流程，一方面做个总结备份，一方面与大家进行一下分享和交流。费话就不多说了，进入一下今天的正题：）
     这里要说明一下环境：首先我在本地局域网内有两台安装有sqlserver2008的机器（注意：已发布的快照版本无法向老版本数据库兼容，意味着2008下创建的事务或快照发布，无法被sqlserver2005订阅）。当然这两台机器要放在同一个网段，一方面出现性能和安全性考虑，另一方面是我目前还没有找到跨不同网段的快照应用方案（可行性的那种）。
     好了，这里我以我们产品数据库为准来介绍一下如何通过发布订阅的方式来进行数据同步。
     首先，在要发布的数据库上创建一个我们的产品数据库（这里叫做dnt_new）,然后在该数据库实例的左侧导航的“复制”--“本地发布”上击右键，然后选择“新建发布”，如下：
 &nbs ......

 一年前开发了一个MIDAS的程序,最近修改服务端,可是这个服务无法注册,最后终于找到了解决办法,这个相关文章如下:(算是备份吧)
（一）MIDAS是什么？
Delphi中MIDAS到底是什么呢?和他相关组件是什么呢? 
MIDAS(Multitiered Distributed Application Services)多层分布式应用服务。
   Delphi所提出的Multi-Tier结构是把原来的Two-Tier前台应用程序内的dbExpress,ADO,BDE,SQL Link,DataMoule,拿到另外一台NT服务器(就是所谓的应用程序服务器),而前台程序只剩下一个可执行文件及MIDAS.DLL,而移到NT服务器上的DataMoule则变成一个COM程序(Remote DataModule).
   注:前台一定要把MIDAS.DLL发布到系统目录下.
   (1)前台程序会通过调用应用程序服务器提供的方法(接口)提出一个请求
   应用程序服务器会响应这个请求,传送一个相应的SQL命令到后台数据库,而后台数据库会把执行SQL命令产生的DataSet返回给应用程序服务器.
   注:Delphi提供了Type Library来帮助应用程序服务器定义COM方法(接口)
   (2)NT服务器上的COM程序是通过中间软件(dbExpress,ADO,BDE,SQL Link)传送SQL到后台数据库.
 & ......

原来是要在FormCreate中加入以下代码:
procedure TTntForm1.TntFormCreate(Sender: TObject);
begin
  //这句很关键.对于平台的支持.
  if Win32Platform = VER_PLATFORM_WIN32_NT then
    Font.Name := 'MS Shell Dlg 2'
  else
    Font.Name := 'MS Shell Dlg';
end;
这样就可以很好的实现对各种语言字体的支持了.
经验总结:
凡事还是用心去做,都会有异想不到的收获的. ......

使用到TIdHashMessageDigest5. uses IdHashMessageDigest; function Preprocess(aPassWord, aVerifyCode:string):string;
begin
     Result:= Fmd5(md5_3(aPassWord) + UpperCase(aVerifyCode));
end; function md5_3(str:string):string;
begin
     Result:= Fmd5(str);
     Result:= HashStr2BinStr(Result);
     Result:= Fmd5(Result);
     Result:= HashStr2BinStr(Result);
     Result:= Fmd5(Result);
end; function Fmd5(str:string):string;
var
   md5 : TIdHashMessageDigest5;
   longWordRec : T4x4LongWordRecord;
begin
     md5 := TIdHashMessageDigest5.Create;
     try
        {$IFDEF ID10}
        Result:= md5.HashStringAsHex(str);
      ......

http://blog.csdn.net/cyai/archive/2009/05/25/4213956.aspx 
JS自带函数
concat
将两个或多个字符的文本组合起来，返回一个新的字符串。
var a = "hello";
var b = ",world";
var c = a.concat(b);
alert(c);
//c = "hello,world"
indexOf
返回字符串中一个子串第一处出现的索引（从左到右搜索）。如果没有匹配项，返回 -1 。
var index1 = a.indexOf("l");
//index1 = 2
var index2 = a.indexOf("l",3);
//index2 = 3
charAt
返回指定位置的字符。
var get_char = a.charAt(0);
//get_char = "h"
lastIndexOf
返回字符串中一个子串最后一处出现的索引（从右到左搜索），如果没有匹配项，返回 -1 。
var index1 = lastIndexOf('l');
//index1 = 3
var index2 = lastIndexOf('l',2)
//index2 = 2
match
检查一个字符串匹配一个正则表达式内容，如果么有匹配返回 null。
var re = new RegExp(/^\w+$/);
var is_alpha1 = a.match(re);
//is_alpha1 = "hello"
var is_alpha2 = b.match(re);
//is_alpha2 = null
substring
返回字符串的一个子串，传入参数是起始位置和结束位置。
var sub_string1 = a.substring(1);
//sub_string1 = "e ......