摘要: 引用StrUntil.pas单元里面有两个函数可以比较字符串与字符串集合,判断是否字符串在字符串集合中。函数 function AnsiMatchStr(const AText: string; const AValues: array of string): Boolean; $[StrUtils... 阅读全文
posted @ 2013-11-27 23:52 胡伟峰 阅读(293) 评论(0) 推荐(0) 编辑
摘要: //使用 TFieldDef 建表: begin with ClientDataSet1.FieldDefs do begin Add('Name' , ftString, 12, True); { True 表示是必填字段 } Add('Age', ftInteger); end;... 阅读全文
posted @ 2013-11-27 22:12 胡伟峰 阅读(443) 评论(0) 推荐(0) 编辑