From 2faecb4966d556b2501b4faaf02133de517d5327 Mon Sep 17 00:00:00 2001
From: "John P (Dgby714)" <Dgby714@gmail.com>
Date: Sat, 23 Jul 2011 18:01:13 -0400
Subject: [PATCH] MML: SendKeys (win), Removed a WriteLn and added a small
 check.

---
 Units/MMLCore/os_windows.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Units/MMLCore/os_windows.pas b/Units/MMLCore/os_windows.pas
index d7520d6..6d6f77a 100644
--- a/Units/MMLCore/os_windows.pas
+++ b/Units/MMLCore/os_windows.pas
@@ -380,8 +380,8 @@ begin
     Shift := (Hi(VK) > 0);
     C := LoByte(VK);
     ScanCode := MapVirtualKey(C, 0);
-
-    WriteLn(ScanCode);
+    if (ScanCode = 0) then
+      Continue;
 
     if (Shift) then
       Keybd_Event(VK_SHIFT, $2A, 0, 0);