正則PerlRegEx實現的批量替換指定文件中的標簽

示例：

一個朋友需要而編寫的標簽升級更新。

速度超快，1w個文件大概4,5秒，本想加個多線程顯示進度，後來想想算了

主要代碼：

　　　　　　　reg.RegEx :=  + Edit_regular1.Text + =  + Edit_Replacement.Text + ==  + Edit_regular2.Text + =  + Edit_replacement2.Text +