Hola...
Algo rápido y de memoria:
Código Delphi
[-]
var
PStart: integer;
PEnd: integer;
Text: string;
begin
Text := 'Texto de (eliminar_esto) ejemplo.';
PStart := Pos('(', Text);
PEnd := Pos(')', Text);
Delete(Text, PStart, (PEnd - PStart) + 1);
end;
Saludos...