PBMiner

$PBExportHeader$u_cb.sru
forward
global type u_cb from commandbutton
end type
end forward

global type u_cb from commandbutton
integer width = 334
integer height = 100
integer textsize = -8
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Tahoma"
string text = "none"
end type
global u_cb u_cb

on u_cb.create
end on

on u_cb.destroy
end on

event clicked;SetPointer(HourGlass!)

end event