d.xh= replace (SubString(a.DLKHBS,4,7),'0','')  在SQL里可以运行  d.xh 和a.dlkhbs 都是字段\我想把这个条件语句放到delphi里,要怎么改啊???