摘要: 字典数据表设计,table字段设置排序 读取字典元数据方法procedure SetDataSet(dataset: TDataSet; const table: string);var d: TADOQuery; i: Integer;begin if dataset = nil then Exit; if not dataset.Active then Exit; if table = '' then Exit; d := TADOQuery.Create(nil); try with d do begin Connection := uFunction.GetConnec 阅读全文
posted @ 2010-07-31 09:52 delphi中间件 阅读(574) 评论(0) 推荐(0) 编辑