[Neftali [Germán.Estévez]]

Debería bastar con un código similar a este:

Código Delphi [-]
  s1 := AnsiReplaceText(s, #39, #39#39#39);

Si s contiene:

s => "Villa's brothers";

s1 debería acabar con el valor:

s1 => 'Villa'''s brothers';