REGEX RECURSIVO: Equalização horizontal ==>(?=.*\QÂncora([\E)^ (?(?S)|([^\r\n\]]*\r\n)+) )(?! )
(?=.*\QÂncora([\E)^ (?<S>(?<!\QÂncora([\E).(?:(?P>S)|([^\r\n\]]*\r\n)+) )(?! ) Eis um Regex recursivo para encontrar uma combinação perfeita de parentesis: (?<r>\((?>[^()]+|(?P>r))*\)) Exemplo de uso: ExecutaSQL(?<r>\((?>[^()]+|(?P>r))*\)) Para localizar: ExecutaSQL('Select top 1 1'+FimLinhaStr+ 'From Clientes'+FimLinhaStr+ 'Where CliCod = '''+AdoQueryCliCod.AsString+''' '); ExecutaSQL('Select top 1 1'+FimLinhaStr+ 'From Clientes'+FimLinhaStr+ 'Where CliCod = '''+AdoQueryCliCod.AsString+''' ', FormMain.DataBase); ExecutaSQL('Select top 1 1'+FimLinhaStr+ 'From Clientes'+...