* don't dequeue the key event in SysPollKeyEvent for win16

git-svn-id: trunk@31867 -

packages/rtl-console/src/win16/keyboard.pp

@@ -142,7 +142,7 @@ begin
   if KbdBufEmpty then
     SysPollKeyEvent:=0
   else
-    SysPollKeyEvent:=KbdBufDequeue;
+    SysPollKeyEvent:=KbdBuf[KbdBufTail];
 end;