PB 图表数据窗口操作

string ls_outlet_id,ls_value
grObjectType   lgobt_ClickedObject  
string   ls_grGraphname   =   "gr_1"  
int   li_series,li_category   
lgobt_ClickedObject   =   this.ObjectAtPointer(ls_grGraphname,li_series,li_category)

if   lgobt_ClickedObject   =   TypeData!   then  
 ls_value  =   string(This.GetData(ls_grGraphname,li_series,li_category))//获得X轴数据
 ls_outlet_id=this.categoryname(ls_grGraphname,li_category)//获得Y轴数据
 messagebox(ls_outlet_id,ls_value)

end   if