delphi中怎么加sql的单引号？
RUNSQL(ADORS,'ISGBPRINT'+Trims(ADO_TEMP.Fields[0].AsString)+','+FillZeroToStr(trim(Edit_fp.Text),8),Trim(UserName),1)

现在是Exec ISGBPRINT '20101120083752-01-0000000',00000004,ADMIN
我想Exec ISGBPRINT '20101120083752-01-0000000','00000004',ADMIN
也就是把第二个参数引起来

[解决办法]
RUNSQL(ADORS,'ISGBPRINT'+Trims(ADO_TEMP.Fields[0].AsString)+','
+QuetedStr(FillZeroToStr(trim(Edit_fp.Text),8)),Trim(UserName),1)


[解决办法]
用两个'号， 来代表'就可以了。或者用QuetedStr函数。
[解决办法]