'========================================

Sub zBro_Resize(iTop, iLeft, iWidth, iHeight)

	Browser("micclass:=Browser").Object.Top = cstr(iTop)
  	Browser("micclass:=Browser").Object.Left = cstr(iLeft)
	Browser("micclass:=Browser").Object.Width = cstr(iWidth)	     
	Browser("micclass:=Browser").Object.Height = cstr(iHeight)
  
End Sub

'========================================