这类似于this problem。而且由于您使用的是PCRE，使用递归语法，实际上有一个解决方案。
/
(?(DEFINE) # define a named capture for later convenience
(?P<parenthesized> # define the group "parenthesized" which matches a
# substring which contains correctly nested
# parentheses (it does not have to be enclosed in
# parentheses though)
[^()]* # match arbitrarily many non-parenthesis characters
(?: # start non capturing group
[(] # match a literal opening (
(?P>parenthesized) # recursively call this "parenthesized" subpattern
# i.e. make sure that the contents of these literal ()
# are also correctly parenthesized
[)] # match a literal closing )
[^()]* # match more non-parenthesis characters
)* # repeat
) # end of "parenthesized" pattern
) # end of DEFINE sequence
# Now the actual pattern begins
(?<=[(]) # ensure that there is a literal ( left of the start
# of the match
(?P>parenthesized)? # match correctly parenthesized substring
$ # ensure that we've reached the end of the input
/x # activate free-spacing mode
这个模式的要点显然是parenthesized 子模式。我也许应该详细说明一下。它的结构是这样的：
(normal* (?:special normal*)*)
其中normal 是[^()]，special 是[(](?P>parenthesized)[)]。这种技术称为"unrolling-the-loop"。它用于匹配任何具有结构的东西
nnnsnnsnnnnsnnsnn
其中n 与normal 匹配，s 与special 匹配。
在这种特殊情况下，事情有点复杂，因为我们也使用递归。 (?P>parenthesized) 递归地使用 parenthesized 模式（它是它的一部分）。您可以查看 (?P>...) 语法有点像反向引用 - 除了引擎不会尝试匹配组 ... 匹配的内容，而是再次应用它的子模式。
另外请注意，我的模式不会为您提供正确括号模式的空字符串，但会失败。您可以通过省略后视来解决此问题。向后看实际上是没有必要的，因为引擎总是会返回最左边的匹配项。
编辑：从您的两个示例来看，您实际上并不希望在最后一个不匹配的括号之后的所有内容，而只是在第一个逗号之前的所有内容。您可以使用我的结果并拆分 , 或尝试 Bohemian 的答案。
进一步阅读：
编辑：我注意到您在问题中提到您正在使用 Object Pascal。在这种情况下，您可能实际上并未使用 PCRE，这意味着不支持递归。在这种情况下，该问题就没有完整的正则表达式解决方案。如果我们施加一个限制，例如“在最后一个不匹配的括号之后只能再有一个嵌套级别”（就像在您的所有示例中一样），那么我们可以提出一个解决方案。同样，我将使用“unrolling-the-loop”来匹配 xxx(xxx)xxx(xxx)xxx 形式的子字符串。
(?<=[(]) # make sure we start after an opening (
(?= # lookahead checks that the parenthesis is not matched
[^()]*([(][^()]*[)][^()]*)*
# this matches an arbitrarily long chain of parenthesized
# substring, but allows only one nesting level
$ # make sure we can reach the end of the string like this
) # end of lookahead
[^(),]*([(][^()]*[)][^(),]*)*
# now actually match the desired part. this is the same
# as the lookahead, except we do not allow for commas
# outside of parentheses now, so that you only get the
# first comma-separated part
如果您曾经添加一个输入示例，例如 aaa(xxx(yyy())，您想在其中匹配 xxx(yyy())，那么这种方法将无法匹配它。事实上，任何不使用递归的正则表达式都无法处理任意嵌套级别。
由于您的正则表达式不支持递归，因此您可能最好不使用正则表达式。即使我的最后一个正则表达式与您当前的所有输入示例匹配，它也确实很复杂，可能不值得麻烦。不如这样：逐个字符地遍历字符串并维护一堆括号位置。然后下面的伪代码为您提供最后一个不匹配的( 之后的所有内容：
while you can read another character from the string
if that character is "(", push the current position onto the stack
if that character is ")", pop a position from the stack
# you've reached the end of the string now
if the stack is empty, there is no match
else the top of the stack is the position of the last unmatched parenthesis;
take a substring from there to the end of the string
要获取直到第一个未嵌套逗号的所有内容，您可以再次遍历该结果：
nestingLevel = 0
while you can read another character from the string
if that character is "," and nestingLevel == 0, stop
if that character is "(" increment nestingLevel
if that character is ")" decrement nestingLevel
take a substring from the beginning of the string to the position at which
you left the loop
这两个短循环在未来对其他人来说将更容易理解，并且比正则表达式解决方案灵活得多（至少一个没有递归）。