//为查找属性的SQL语句赋值
with TSQLDataSet(DataSetBroker1.DataSet) do
begin
close;
TSQLDataSet(DataSetBroker1.DataSet).BizFieldByName('sRunId').LookupDef.SQL.Text:= 'select sRunId from BD_D_SUBSTATION';
//'+strDevTab+' where sStatId = '''+dedtBDZ.text+'''';
open;
end;
//为查找属性的SQL语句赋值
with TSQLDataSet(DataSetBroker1.DataSet) do
begin
TSQLDataSet(DataSetBroker1.DataSet).BizFieldByName('KHID').LookupDef.SQL.Text:= 'SELECT KHBH,KHMC FROM KHJBXXB';
end;