在更新前请务必备份源文件! 并且此程序对同一目录只能使用一次! 本程序对只处理了部份DbGridEh事件: StringReplace(Demo[i], TDBGrid , TDBGridEh , [rfIgnoreCase]) StringReplace(Demo[i], DataCol: Integer Column: TColumn , DataCol: Integer Column: TColumnEh , [rfIgnoreCase]) StringReplac