--- a/WinWorkstation.st	Tue Feb 11 11:42:14 2020 +0100
+++ b/WinWorkstation.st	Tue Feb 11 11:48:31 2020 +0100
@@ -6804,7 +6804,8 @@
 
     isHighDpiAware := false.
 
-    OperatingSystem isWin7Like ifTrue:[
+    (OperatingSystem isWin7Like
+    and:[OperatingSystem isWin8Like not]) ifTrue:[
         "win 7 does not include Shcore.dll"    
         ^ isHighDpiAware
     ].
@@ -6839,7 +6840,7 @@
     ^ isHighDpiAware
 
     "Created: / 27-11-2019 / 13:40:04 / Stefan Reise"
-    "Modified (format): / 11-02-2020 / 11:41:07 / Stefan Reise"
+    "Modified: / 11-02-2020 / 11:46:49 / Stefan Reise"
 !
 
 isWindowsPlatform
@@ -6995,7 +6996,8 @@
 
     |scaleFactor|
 
-    OperatingSystem isWin7Like ifTrue:[
+    (OperatingSystem isWin7Like
+    and:[OperatingSystem isWin8Like not]) ifTrue:[
         "win 7 does not include Shcore.dll"    
         ^ super monitorScaleFactorFor:aMonitorHandle
     ].
@@ -7036,7 +7038,7 @@
     ^ scaleFactor / 100
 
     "Created: / 25-11-2019 / 11:52:42 / Stefan Reise"
-    "Modified: / 11-02-2020 / 11:41:30 / Stefan Reise"
+    "Modified: / 11-02-2020 / 11:47:10 / Stefan Reise"
 !
 
 thisAppVirtualResolutionByMonitorDeviceName:aMonitorDeviceName