1.16 TO 10 ******************************************************** 16转10,否则输出-1 function Hex(c: char): Integer;var x: Integer;begin if ( Ord(c)>= Ord('0')) and (Ord(c) <= Ord('9')) then x:= Ord(c) - Ord('0') else if (Ord(c) >= Ord('a')) an
一.提高查询效率先进行准备查询操作: CustomerQuery.Close; if not (CustomerQuery.Prepared) then -->查询是否已准备好 CustomerQuery.Prepare; -->查询准备 CustomerQuery.Open; -->执行查询 二.要在运行期访问参数,有三种方式可以选择:(适合BDE控件中的TQuery) (1)ParamByName: 按名称设置参数的值(2)Params: 按序号设置参数的值(3)Params.Par