Explorar o código

* use UpdateCrc32 instead of Crc32

git-svn-id: trunk@9779 -
peter %!s(int64=17) %!d(string=hai) anos
pai
achega
39cd83a465
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      ide/fpini.pas

+ 2 - 1
ide/fpini.pas

@@ -430,7 +430,8 @@ begin
   AltMouseAction:=INIFile^.GetIntEntry(secMouse,ieAltClickAction,AltMouseAction);
   CtrlMouseAction:=INIFile^.GetIntEntry(secMouse,ieCtrlClickAction,CtrlMouseAction);
   {Keyboard}
-  case crc32(upcase(INIFile^.GetEntry(secKeyboard,ieEditKeys,''))) of
+  S:=upcase(INIFile^.GetEntry(secKeyboard,ieEditKeys,''));
+  case UpdateCrc32(0,s[1],Length(s)) of
     $86a4c898: {crc32 for 'MICROSOFT'}
       EditKeys:=ekm_microsoft;
     $b20b87b3: {crc32 for 'BORLAND'}