Eliminar contenido dentro de paréntesis

[[escafandra]]

¿Hay paréntesis anidados?

Esto es (un ejemplo(de paréntesis) anidado)

Saludos.

[[AgustinOrtu]]

La funcion System.Pos devuelve la primera ocurrencia del string indicado

Tenes que implementar algo mas sofisticado como comenta mamcx

[[AgustinOrtu]]

Una manera muy sencilla de hacerlo:

Código Delphi [-]
const
  Input = 'Texto de(elimi(nar_es)to) ejemplo(esto tambien).';
  Expected = 'Texto de ejemplo.';
var
  Output: string;
  BracketCount: Integer;
  Each: Char;
begin
  BracketCount := 0;
  for Each in Input do
  begin
    if Each = '(' then
      Inc(BracketCount)
    else if Each = ')' then
      Dec(BracketCount)
    else if BracketCount = 0 then
      Output := Output + Each;
  end;

  Assert(Output = Expected);
end.

[bitbow]

Jeje, ya me vole la funcion, muy buena por cierto.

Saludos.