//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "RegularExpressions.hpp"//头文件要加上 #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { System::DynamicArray<System::UnicodeString> ustr; TRegEx *rg=new TRegEx(); ustr=rg->Split(Edit1->Text,Edit2->Text);//字符串分割 Memo1->Clear(); for (int i = 0; i < ustr.Length; i++) { Memo1->Lines->Add(ustr[i]); } delete rg; } //--------------------------------------------------------------------------- //查找所有匹配的字符串 //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { Memo1->Clear(); TMatchCollection tmc=TRegEx::Matches(Edit1->Text,Edit2->Text); for (int i=0;i<tmc.Count;i++) { Memo1->Lines->Add(tmc.Item[i].Value); } }