delphi中如何加sql的单引号

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函数。
------解决方案--------------------

探讨

用两个'号， 来代表'就可以了。或者用QuetedStr函数。