Dynamic Sql Error. Necesito ayuda

[Kipow]

Proba utilizar la funcion QuotedStr

Código Delphi [-]

declaracion 

function QuotedStr(const S: string): string;
   description 

Returns the quoted version of a string. A single quote character (') is inserted at the beginning and end of string S, and each single quote character in the string is repeated.     
example 

var s : string;

s:='Delphi''s Pascal';
//ShowMessage returns Delphi's Pascal
s := QuotedStr(s);
//ShowMessage returns 'Delphi''s Pascal'