new form
  name			bld_browse
  origin		33.5 0.2
  size			95 32
  start			hidden
  shade			white
end form

new form
	name			building_class_sub
	type			form
	origin			1 1.5
	size			20 9
	shade			dark grey
	selection border	0
	label position		fit left
	border			1
end form

new field
	name			browse_class
	type			menu
	origin			2.5 1.5
	size			15 1
	label string		Building class
	label position		fit above
	menu			??
	selection border	0
	border			1
end field

parent form	@bld_browse

new form
	name			building_sub
	type			form
	origin			1 9.25
	size			20 10
	shade			dark grey
	selection border	0
	label position		fit left
	border			1
end form

	new field
		name			browse_type
		type			menu
		origin			2.5 1.5
		size			15 1
		menu			??\
					??
		label colour		white
		label position		fit above
		label string		building type
		border			1
	end field

parent form	@bld_browse

new field
	name			browse_image
	type			popup
	origin			22 1.5
	size			68 21
	label string		image
	label position		fit above
	menu			pic_a
	selection border	0
	border			10
end field

parent form	@bld_browse

new field
	name			browse_done
	type			button
	origin			82 17.5
	size			6 1
	label position		fit left
	menu			Done=abort
	selection border	0
	border			1
end field

new field
	name			browse_select
	type			button
	origin			22 17.5
	size			7 1
	label position		fit left
	menu			select
	selection border	0
	border			1
end field
