正则表达式 – 如何在Delphi(Win32)中找到硬错误的接口强制转换

ISomeInterface(CurrentObj)

CurrentObj as ISomeInterface

你没有说你正在使用哪种正则表达式.我将假设PCRE(与Perl兼容的正则表达式),这意味着这些示例不适用于IDE的“查找”对话框中的goofball“正则表达式”选项.但是,它们可以与任何自尊的grep工具一起使用,也可以与Perl,Ruby,.NET和许多其他语言中的内置正则表达式一起使用.

你可以从这样的事情开始：

w+s*(

它将搜索一个或多个单词字符,后跟零个或多个空格,然后是一个左括号.这符合：

TObject (Foo)

但是根据你的正则表达式库,以及你使用哪些选项,以及如何将输入传递给它,如果在打开的paren之前有换行符,可能匹配或不匹配：

TObject
  (Foo)

如果两者之间有评论,肯定是不行的,就像这个病态案例一样：

X := ISomeInterface // come back and look at this cast,it's dangerous
  (CurrentObj);

但对于大多数格式良好的代码,它都足够好了.

现在你的问题是它给你提供的不仅仅是类型转换 – 它还为你提供代码中的每个方法调用.因此需要进行一些改进.

如果您的代码遵循典型的Delphi编码风格,那么这可能会更好：

b[TIE][A-Z]w+s*(

并确保您进行区分大小写的匹配.这将匹配任何有字边界的地方,然后是大写字母T(大多数类和类型的传统前缀)或大写字母I(接口的前缀)或大写字母E(Exception后代的前缀),后跟另一个资本字母,然后是一些大写或小写字母或数字或下划线,后跟可选空格和开放式字符.这很有可能是你需要的.

但是,如果你有任何类型名称不遵循通常的命名约定(例如T之后有一个小写字母的TfcTreeView),或者你依赖Delphi的不区分大小写(例如,如果你有可能有任何机会像tobject(Foo)甚至Tobject(Foo)这样的代码,然后变得更难.如果是这种情况,请发布一些细节,我也许可以提出建议.