摘要:
字典数据表设计,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 阅读全文