Browse Source

- removed redundant setting of result in TranslateKey

git-svn-id: branches/unicodekvm@40233 -
nickysn 6 năm trước cách đây
mục cha
commit
58d899bf75
1 tập tin đã thay đổi với 0 bổ sung2 xóa
  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;