引号配对,看不懂
.......
var
filterstr:string;
begin
Query_FWDCX.Close;
Query_FWDCX.SQL.Clear;
filterstr :='';
//if CheckBox3.Checked then
filterstr :=filterstr + ' and KX.FJH=''' + fjharr[ComboBox1.itemindex] + '''';
if CheckBox1.Checked then
filterstr := filterstr + ' and KX.MC like ''%' + Edit1.Text + '%''';
if CheckBox2.Checked then
filterstr := filterstr + ' and FWD.XSDMC like ''%' + Edit2.Text + '%''';//这三句中的引号不懂怎么配对,到底哪些才是字符串中的内容,意思也不太明白;
还有RES_FNKG_INFO 表不是到底下这句才起KS的别名吗?上面这三句怎么知道KS指的就是RES_FNKG_INFO ??
Query_FWDCX.sql.Text := 'select FWD.*,KX.MC as KXMC from RES_FNKG_INFO KX,XS_FWD FWD where FWD.ID=KX.ID ' + filterstr;
Query_FWDCX.Open;
......