regex - 正規表現:特定の文字までのテキストを見つける方法は?

Question

Delphiユニットで使用されているDelphiユニットのリストを分離しようとしています... Delphiユニット。このために、私はパターンを使用します

(uses|Uses|USES)(.*\r\n)(.+\r\n)+

この場合、非常にうまく機能します。

uses
  SysUtils, Classes, CTLibEnhQuery, CTLibQuery, CTLibDatabase, DB,
  CTMemDataSet, CTDataSet,CTStoredProc, DosCommand, ActnList, CTQuery,
  FlyingOp, Tools, FindFile, Dialogs;

しかし、これで

uses Variants, HyperStr, Config;
{$R *.dfm}

{$R *.dfm} も取得します。だから私の質問は次のとおりです。セミコロンまでテキストを取得する方法は?
ご協力いただきありがとうございます

Answer 1

まず、 の代わりに(uses|Uses|USES)、正規表現マッチャーを大文字と小文字を区別しないモードに切り替えます。次に、次のようにします。

uses(([^;]|[\n\r])*)

Group 1あなたが求めているリストを保持します。