>Hi Arto,
>
>I just tried your enhanced class browser and did not get the expected results with a simple form that has the MS webbrowser control on it. I had thought that it would add the Oleclass property to the olecontrol when it generated the prg for the form, but alas the Oleclass property was missing. I went through your code briefly and it looks like you implemented the ability to do this with a few limitations having to do with ImageList, but it doesn't appear to work for the webbrowser control. Any ideas why this isn't working?

I made a form where I put a webbrowser activex. No problem with modes 2, 3, 4 and 5. Could you send me the simple form you mentioned that I can check it?

AT

Mode 2

***************************************************
* Class Browser modifications by Arto Toikka 2005 *
* =============================================== *
*                                                 *
* Mode 2                                          *
* View Code generated: 04/01/06 10:56:50 AM       *
***************************************************

PUBLIC oform1_1RP0NGP76

oform1_1RP0NGP76=NEWOBJECT("form1")

oform1_1RP0NGP76.Show
RETURN


**************************************************
*-- Form:            form1 (d:\program files\microsoft visual foxpro 9\browserfix\_webbrowser1.scx)
*-- ParentClass:     form
*-- BaseClass:       form
*-- Time Stamp:      04/01/06 10:56:07 AM
*
DEFINE CLASS form1 AS form


	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"
	Visible = .T.


	ADD OBJECT olecontrol1 AS olecontrol_L1_C1_TC2


ENDDEFINE
*
*-- EndDefine: form1
**************************************************


**************************************************
*-- Olecontrol:      olecontrol1 (d:\program files\microsoft visual foxpro 9\browserfix\_webbrowser1.scx)
*-- ParentClass:     olecontrol
*-- BaseClass:       olecontrol
*-- Time Stamp:      04/01/06 10:56:07 AM
*-- OLEObject = C:\WINDOWS\system32\shdocvw.dll
*
DEFINE CLASS olecontrol_L1_C1_TC2 AS olecontrol


	Top = 48
	Left = 72
	Height = 132
	Width = 216
	Name = "Olecontrol1"
	OleClass = "Shell.Explorer.2"
	Visible = .T.


ENDDEFINE
*
*-- EndDefine: olecontrol1
**************************************************

Mode 3

***************************************************
* Class Browser modifications by Arto Toikka 2005 *
* =============================================== *
*                                                 *
* Mode 3                                          *
* View Code generated: 04/01/06 10:57:43 AM       *
***************************************************

PUBLIC oform1_1RP0NHUG3

oform1_1RP0NHUG3=NEWOBJECT("form1")

oform1_1RP0NHUG3.Show
RETURN


**************************************************
*-- Form:            form1 (d:\program files\microsoft visual foxpro 9\browserfix\_webbrowser1.scx)
*-- ParentClass:     form
*-- BaseClass:       form
*-- Time Stamp:      04/01/06 10:56:07 AM
*
DEFINE CLASS form1 AS form


	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"
	Visible = .T.


	ADD OBJECT olecontrol1 AS olecontrol_L1_C1_TC2


ENDDEFINE
*
*-- EndDefine: form1
**************************************************


**************************************************
*-- Olecontrol:      olecontrol1 (d:\program files\microsoft visual foxpro 9\browserfix\_webbrowser1.scx)
*-- ParentClass:     olecontrol
*-- BaseClass:       olecontrol
*-- Time Stamp:      04/01/06 10:56:07 AM
*-- OLEObject = C:\WINDOWS\system32\shdocvw.dll
*
DEFINE CLASS olecontrol_L1_C1_TC2 AS olecontrol


	Top = 48
	Left = 72
	Height = 132
	Width = 216
	Name = "Olecontrol1"
	OleClass = "Shell.Explorer.2"
	Visible = .T.


ENDDEFINE
*
*-- EndDefine: olecontrol1
**************************************************

Mode 4

***************************************************
* Class Browser modifications by Arto Toikka 2005 *
* =============================================== *
*                                                 *
* Mode 4                                          *
* View Code generated: 04/01/06 10:58:10 AM       *
***************************************************

PUBLIC oform1_1RP0NIF1P

oform1_1RP0NIF1P=NEWOBJECT("form1")

oform1_1RP0NIF1P.Show
RETURN


**************************************************
*-- Form:            form1 (d:\program files\microsoft visual foxpro 9\browserfix\_webbrowser1.scx)
*-- ParentClass:     form
*-- BaseClass:       form
*-- Time Stamp:      04/01/06 10:56:07 AM
*
DEFINE CLASS form1 AS form


	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"
	Visible = .T.


	ADD OBJECT olecontrol1 AS olecontrol WITH ;
		Top = 48, ;
		Left = 72, ;
		Height = 132, ;
		Width = 216, ;
		Name = "Olecontrol1", ;
		OleClass = "Shell.Explorer.2", ;
		Visible = .T.


ENDDEFINE
*
*-- EndDefine: form1
**************************************************

Mode 5

***************************************************
* Class Browser modifications by Arto Toikka 2005 *
* =============================================== *
*                                                 *
* Mode 5                                          *
* View Code generated: 04/01/06 10:58:33 AM       *
***************************************************

PUBLIC oform1_1RP0NIX11

oform1_1RP0NIX11=NEWOBJECT("form1")

oform1_1RP0NIX11.Show
RETURN


**************************************************
*-- Form:            form1 (d:\program files\microsoft visual foxpro 9\browserfix\_webbrowser1.scx)
*-- ParentClass:     form
*-- BaseClass:       form
*-- Time Stamp:      04/01/06 10:56:07 AM
*
DEFINE CLASS form1 AS form


	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"
	Visible = .T.


	ADD OBJECT olecontrol1 AS olecontrol WITH ;
		Top = 48, ;
		Left = 72, ;
		Height = 132, ;
		Width = 216, ;
		Name = "Olecontrol1", ;
		OleClass = "Shell.Explorer.2", ;
		Visible = .T.


ENDDEFINE
*
*-- EndDefine: form1
**************************************************