Delphi6での正規表現 (ID:41368)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ついでに、ソースが同梱されていたので軽く追ってみました。 問題は、bmregexp.pas - TREParser.NegativeCharacterClass の中にあるRemoveCC関数で 分割後のノードが両方nilだった場合のケアをしていないことですね。 この場合、そのノードは分割できなかった（その必要がなかった）ということなので、まるまる取り除いて構わないはず。 （取り除かないと、先に進まずに同じノードを延々調べ続けることになります） > if (pNode1 <> nil) or (pNode2 <> nil) then begin という行（と対応するend文）を外せば直るのではないかと思います。