SQL表中不存在则添加示例
Delphi示例
Format('Insert into 表1(单元科室,项目,期间,值) select 单元科室=''%S'' ,项目=''%S'',期间=''%S'',值=''%S'' '+
' where Not Exists(select 1 from 表1 where 单元科室=''%S'' and 项目=''%S'' and 期间=''%S'' and 值=''%S'')' ,
[UnitOrDept, ItemName, Period, Values,UnitOrDept, ItemName, Period, Values]);