Explorar o código

- removed redundant setting of result in TranslateKey

git-svn-id: branches/unicodekvm@40233 -
nickysn %!s(int64=6) %!d(string=hai) anos
pai
achega
58d899bf75
Modificáronse 1 ficheiros con 0 adicións e 2 borrados
  1. 0 2
      packages/rtl-console/src/win/keyboard.pp

+ 0 - 2
packages/rtl-console/src/win/keyboard.pp

@@ -781,8 +781,6 @@ begin
          if b <> 0 then
            key := (key and $FFFF0000) or (cardinal (b) shl 8);
        end;
-
-     TranslateKey := key;
   end;
   translateKey := Key;
 end;