--- a/VisualComponent.st	Thu Jun 18 16:55:52 1998 +0200
+++ b/VisualComponent.st	Thu Jun 18 16:56:28 1998 +0200
@@ -68,18 +68,94 @@
     ^ self basicNew initialize
 ! !
 
+!VisualComponent class methodsFor:'queries'!
+
+defaultFont
+    ^ SimpleView defaultFont
+
+    "Created: / 18.6.1998 / 16:14:22 / cg"
+!
+
+defaultViewBackgroundColor
+    ^ SimpleView defaultViewBackgroundColor
+
+    "Created: / 18.6.1998 / 16:15:17 / cg"
+! !
+
 !VisualComponent methodsFor:'accessing'!
 
+backgroundColor
+    ^ Color white
+
+    "Created: / 18.6.1998 / 16:01:00 / cg"
+!
+
+backgroundColor:aColor
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:15:28 / cg"
+!
+
 container:someContainer
     "ignored here"
 
     "Created: 9.5.1996 / 00:48:54 / cg"
 !
 
+defaultFont
+    ^ SimpleView defaultFont
+
+    "Created: / 18.6.1998 / 16:13:56 / cg"
+!
+
+font:aFont
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:14:39 / cg"
+!
+
+foregroundColor
+    ^ Color black
+
+    "Created: / 18.6.1998 / 16:01:07 / cg"
+!
+
+foregroundColor:aColor
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:14:53 / cg"
+!
+
+geometryLayout:aLayout
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:15:39 / cg"
+!
+
+hiddenOnRealize:aBoolean
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:13:19 / cg"
+!
+
+id
+    "ignored here"
+
+    ^ nil
+
+    "Created: / 18.6.1998 / 16:13:34 / cg"
+!
+
 setParentViewIn:aView
     "ignored here - for now"
 
     "Created: 9.5.1996 / 00:19:39 / cg"
+!
+
+superView
+    ^ self container
+
+    "Created: / 18.6.1998 / 16:16:07 / cg"
 ! !
 
 !VisualComponent methodsFor:'accessing - dimensions'!
@@ -100,9 +176,7 @@
 
     "Created: 8.5.1996 / 23:35:19 / cg"
     "Modified: 9.5.1996 / 00:12:00 / cg"
-! !
-
-!VisualComponent ignoredMethodsFor:'accessing - dimensions'!
+!
 
 bounds:aRectangle
     "set my bounds"
@@ -111,9 +185,7 @@
 
     "Created: 8.5.1996 / 23:36:07 / cg"
     "Modified: 9.5.1996 / 00:13:12 / cg"
-! !
-
-!VisualComponent methodsFor:'accessing - dimensions'!
+!
 
 left
     "return my left x coordinate"
@@ -336,5 +408,5 @@
 !VisualComponent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.14 1997-02-10 18:28:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.15 1998-06-18 14:56:22 cg Exp $'
 ! !