#DOCUMENTATION by exept
authorClaus Gittinger <cg@exept.de>
Fri, 13 Sep 2019 09:26:49 +0200
changeset 8802 9af7e3a20315
parent 8801 5e7b7a640812
child 8803 28115af369c8
#DOCUMENTATION by exept class: ElectronWorkstation added: #ungrabKeyboard #ungrabPointer comment/format in: #createWindowFor:type:origin:extent:minExtent:maxExtent:borderWidth:subViewOf:style:inputOnly:label:owner:icon:iconMask:iconView: changed: #ascentOf: #descentOf: #destroyView:withId: #mapWindow: #maxAscentOf: #maxDescentOf: #maxWidthOfFont: #minWidthOfFont: #pointerPosition #setWindowBackground:in: #setWindowName:in: #unmapWindow: #widthOf:from:to:inFont:
ElectronWorkstation.st
--- a/ElectronWorkstation.st	Thu Sep 12 22:50:35 2019 +0200
+++ b/ElectronWorkstation.st	Fri Sep 13 09:26:49 2019 +0200
@@ -80,11 +80,13 @@
 
 ascentOf:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: ascentOf'.
     ^ 17
 !
 
 descentOf:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: descentOf'.
     ^ 17
 !
 
@@ -105,26 +107,31 @@
 
 maxAscentOf:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: maxAscentOf'.
     ^ 17
 !
 
 maxDescentOf:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: maxDescentOf'.
     ^ 17
 !
 
 maxWidthOfFont:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: maxWidthOfFont'.
     ^ 20
 !
 
 minWidthOfFont:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: minWidthOfFont'.
     ^ 20
 !
 
 widthOf:aString from:index1 to:index2 inFont:aFontId
     "/ the font name is its ID
+    Logger info:'unimplemented: widthOf'.
     ^ (index2-index1+1) * 20
 ! !
 
@@ -187,10 +194,21 @@
     ].
 ! !
 
+!ElectronWorkstation methodsFor:'keyboard stuff'!
+
+ungrabKeyboard
+    Logger info:'unimplemented: ungrabKeyboard'.
+! !
+
 !ElectronWorkstation methodsFor:'pointer stuff'!
 
 pointerPosition
+    Logger info:'unimplemented: pointerPosition'.
     ^ 0@0
+!
+
+ungrabPointer
+    Logger info:'unimplemented: ungrabPointer'.
 ! !
 
 !ElectronWorkstation methodsFor:'window stuff'!
@@ -201,36 +219,37 @@
         label:label owner:owner
         icon:icn iconMask:icnM iconView:icnV
 
-    ^ 1234
+    Logger info:'unimplemented: createWindowFor:'.
+    ^ 1234 "/ dummy handle (windowID)
 !
 
 destroyView:aView withId:aWindowId
 
-    self halt.
+    Logger info:'unimplemented: destroyView:'.
 !
 
 mapWindow:aWindowId
     "map a window"
 
-    self halt.
+    Logger info:'unimplemented: mapWindow:'.
 !
 
 setWindowBackground:aColorIndex in:aWindowId
     "set a windows background color"
 
-    self halt.
+    Logger info:'unimplemented: setWindowBackground:'.
 !
 
 setWindowName:aString in:aWindowId
     "define a windows name (i.e. windowTitle)"
 
-    self halt.
+    Logger info:'unimplemented: setWindowName:'.
 !
 
 unmapWindow:aWindowId
     "unmap a window"
 
-    self halt.
+    Logger info:'unimplemented: unmapWindow:'.
 ! !
 
 !ElectronWorkstation::ElectronGraphicsContext class methodsFor:'documentation'!