Как я могу найти все пустые попытки ... кроме блоков с GExperts grep?

Question

В новых версиях GExperts утилита grep теперь поддерживает более «экспертные» выражения.

Я еще не нашел способ найти пустую попытку ... кроме блоков в источниках Delphi с использованием регулярных выражений, как я мог это сделать с помощью инструмента GExperts grep?

Answer 1

Я сомневаюсь, что функциональность GExperts Regex позволяет выполнять поиск за пределами разделителей строк.

Если вы не возражаете против использования такого компонента, как TPerlRegEx, следующий код должен помочь вам начать собственный поиск.

var 
    emptyExceptBlock: TPerlRegEx; 
    Results: TStringList; 

emptyExceptBlock := TPerlRegEx.Create(nil); 
emptyExceptBlock.RegEx := except\s+((//.*|/\*.*\*/|\(\*.*\*\))\s+)*end; 
emptyExceptBlock.Options := [preExtended]; 
emptyExceptBlock.Subject := LoadFromFile('YourFile.pas'); 
Results := TStringList.Create; 
if emptyExceptBlock.Match then begin 
    repeat 
     Results.Add(emptyExceptBlock.MatchedExpression); 
    until not emptyExceptBlock.MatchAgain; 
end; 

Answer 2

Существует инструмент под названием Insert Auto Todo (который не является частью GExperts, я думаю, что я получил его от CodeCentral), который автоматически вставляет Todos в пустые начала/конца блоков. Может, это то, чего ты хочешь?