在更新前请务必备份源文件!

并且此程序对同一目录只能使用一次!

本程序对只处理了部份DbGridEh事件:

StringReplace(Demo[i], TDBGrid , TDBGridEh , [rfIgnoreCase])

StringReplace(Demo[i], DataCol: Integer Column: TColumn , DataCol: Integer Column: TColumnEh , [rfIgnoreCase])

StringReplace(Demo[i], Click(Column: TColumn) , Click(Column: TColumnEh) , [rfIgnoreCase])

StringReplace(Demo[i], DbGrids , DbGridEh , [rfIgnoreCase])



如果你还有DbGridEh其它事件请修改源代码!-the update before you must backup source! And this procedure on the same directory may be used only once! Only the Department of procedures Jimmy DbGridEh part of the incident : StringReplace (Demo [i] TDBGrid, TDBGridEh. [rfIgnoreCase]) StringReplace (Demo [i] DataCol : Integer Column : TColumn, DataCol : Integer Column : TColumnEh. [rfIgnoreCase]) StringReplace (Demo [i] Click (Column : TColumn), Click (Column : TColumnEh) [rfIgnoreCase]) StringReplace (Demo [i] DbGrids, DbGridEh. [rfIgnoreCase]) If you have DbGridEh other incidents please modify the source code!