摘要:
like查询用* SELECT * FROM flash WHERE filename like '*http*'; DELETE * FROM company_guangxi WHERE 机构名称 not like '*公司*' and 机构名称 not like '*工厂*'; 删除查询 DELETE * FROM 订单 WHERE 订单.下单日期"1"; 日期时间分隔符是#而不是引号 ... 阅读全文
摘要:
ACCESS SQL语法参考 一. 基础概念 可以使用的数据类型如下: 1. TEXT:文本型(指定长度时),备注型(不指定长度时); 2. CHAR,NCHAR,VARCHAR,NVARCHAR:文本型,可以指定长度,否则默认值为255! 3. BYTE,TINYINT:数字-字节,不要指定长度和精度,否则会报错! 4. SMALLINT,SHORT:数字... 阅读全文
摘要:
首部 function FormatFloat(const Format: string; Value: Extended): string; $[SysUtils.pas 功能 返回浮点数类型以指定格式字符串Format转换成字符串 说明 FormatFloat(',.00', 1234567890) = '1,234,567,890.00' 参考 function SysUtils.Float... 阅读全文
摘要:
首部 function Languages: TLanguages; $[SysUtils.pas 功能 返回系统语言对象 说明 通过此函数可以得到系统的语言环境 参考 type SysUtils.TLanguages 例子 ///////Begin Languages procedure TForm1.Button1Click(Sender: TObject); var I: Intege... 阅读全文
摘要:
DbGrid的OnDrawColumnCell事件 如你现在有一个ADOTable1,一个DbGrid1,假如你数据库里面的列名分别是(序号,名字,年龄),你要将年龄为23的格填充背景色为黑色,字体颜色改为白色,代码如下: procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: I... 阅读全文
摘要:
//关联tabset+nodebook procedure TForm1.FormCreate(Sender: TObject); begin ts1.Tabs := nb1.Pages; end; //tabset对nodebook进行切换 procedure TForm1.ts1Click(Sender: TObject); begin nb1.PageIndex := ts1.Tab... 阅读全文