Mel,

Here's whole class definitions.

DEFINE CLASS ScreenBrowser AS Container
  BorderWidth = 0
	
  ADD OBJECT Browser AS WB
	
  PROCEDURE Init
    BINDEVENT(_Screen, "Resize", This, "scr_Resize")
    This.scr_Resize()
  ENDPROC 

  PROCEDURE scr_Resize
    This.Move(0, 0, _Screen.Width, _Screen.Height)
    This.Browser.Move(0, 0, _Screen.Width, _Screen.Height)
  ENDPROC 
ENDDEFINE 

DEFINE CLASS WB AS OleControl
	Oleclass = "Shell.Explorer.2"
ENDDEFINE

>Hi Sergey,
>
>I am a little confused (not first time though). The code you gave to Anton:
>

>...	
>  ADD OBJECT Browser AS WB
>
>...
>
>DEFINE CLASS WB AS OleControl
>	Oleclass = "Shell.Explorer.2"
>ENDDEFINE
>

>Is that being added to his code, or replacing what he gave completely?
>
>Mel Cummings