Eliminar caracteres y numeros

[ecfisa]

Hola de nuevo.

Sin embargo, si tu intención era usar el procedimiento Delete, podes hacerlo así:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  cadena:string;
begin
  cadena := '(131) Betanzos 2 (A Coruña)';
  Delete(cadena, 1, Pos(')', cadena)+1);
  ShowMessage(Trim(cadena));
end;

Saludos