EhGrid支持Delphi2006的方法，共2处修改：
1、在EhLib.Inc文件尾部添加：
{$IFDEF VER180} { Borland Delphi 10.0 }
// {$DEFINE EH_LIB_35}
// {$DEFINE EH_LIB_4}
{$DEFINE EH_LIB_5}
{$DEFINE EH_LIB_6}
{$DEFINE EH_LIB_7}
{$DEFINE EH_LIB_8}
{$DEFINE EH_LIB_9}
{$ENDIF}
2、修改文件DbUtilsEh.pas，添加后几种的类型支持 找到STFldTypeMapEh替换掉旧可以了。
STFldTypeMapEh: array[TFieldType] of TSTOperandTypeEh = (
botNon, botString, botNumber, botNumber, botNumber,
botBoolean, botNumber, botNumber, botNumber, botDateTime, botDateTime, botDateTime,
botNon, botNon, botNumber, botNon, botString, botNon, botString,
botNon, botNon, botNon, botNon, botString, botString,
botNumber, botNon, botNon, botNon, botNon
{$IFDEF EH_LIB_5}
,botNon, botNon, botNon, botNon, botNon, botString
{$ENDIF}
{$IFDEF EH_LIB_6}, botDateTime, botNumber{$ENDIF}
{$IFDEF VER180},botNon,botString,botDateTime,botNon {$ENDIF}
); |
