grObjectType cob
string gr_name="gr_1"
int yy, xx
cob=this.ObjectAtPointer(gr_name,yy,xx)
If cob = TypeData! Then
st_popup.text=string(this.GetData(gr_name, yy, xx),"######")
st_popup.x=parent.PointerX()
st_popup.y=parent.PointerY() - 65
st_popup.visible=true
End If
书上就写了这么多,但是到底怎么用,我也不太会,我也是才学PB的,没办法,期末交设计,帮帮我