Hola,
Tampoco a mí me queda muy claro el asunto, pero, suponiendo que se trate de reemplazar esto: '' por esto otro: ' Entonces una función tal que esta pueda servir:
Código Delphi
[-]
function ReplaceDoubleSingleQuotesBySingleQuotes( const str : string ) : string;
const
SINGLE_QUOTE = '''';
DOUBLE_SINGLE_QUOTE = SINGLE_QUOTE + SINGLE_QUOTE;
begin
result := System.SysUtils.StringReplace
(
str, DOUBLE_SINGLE_QUOTE, SINGLE_QUOTE, [ rfReplaceAll ]
);
end;
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
s : string;
begin
s := 'This string '''' have double single '''' quotes inside';
ShowMessage( s );
s := ReplaceDoubleSingleQuotesBySingleQuotes( s );
ShowMessage( s ); end;