Fórum Removendo Mascara em Consulta #387200

Olá estou com o seguinte problema aqui no sistema o sistema grava na sua base dessa forma (099)9999-9999 por exemplo tenho q remover esse (099) para q o sistema possa fazer a pesquiza por o campo telefone corretamente...

minha consulta esta dessa forma:

  if key = #13 then
  begin
      frmmodulo.qrcliente.close;
      frmmodulo.qrcliente.sql.clear;
      frmmodulo.qrcliente.sql.add('select * from c000007 where telefone1 = '''+edittelefone.text+''' order by nome');
      frmmodulo.qrcliente.open;
      if frmmodulo.qrcliente.RecNo = 1 then
      begin
        editCliente.text  := frmmodulo.qrcliente.fieldbyname('codigo').asstring;
        enomecliente.text := frmmodulo.qrcliente.fieldbyname('nome').asstring;
        editCliente.SetFocus;
      end
      else
      begin
        ShowMessage('Registro não encontrado!');
        enomecliente.text := '';
        editCliente.SetFocus;
        editCliente.SelectAll;
      end;
    end

porem teria q remover o (099) para q a consulta funcione corretamente pois o cliente so vai digitar os ultimos digitos 9999-9999 para a pesquiza...