DataWindow

문제

그래프에 커서위치시 풍선도움말 나타내기

해결

grObjectType    ClickedObject
string          ls_grgraphname="데이타 원도우 이름(dw_1이 아니라 gr_1임)"
string          ls_xdata
int             li_series, li_category, li_first

ClickedObject = this.ObjectAtPointer (ls_grgraphname, li_series,li_category)
 
If ClickedObject = TypeData! Then
        if li_first=0 then
        ls_xdata = this.CategoryName (ls_grgraphname, li_category)

        SELECT a_name        //데이타에 맞는 값을 표현하기 위한 select문
          INTO :ls_xdate
          FROM aaa
         WHERE a_code = :ls_xdate;
                  
   ls_xdata = Trim(ls_xdata)+":"+string(this.GetData(ls_grgraphname,&
                                    li_series, li_category),"###,##0")
                          //풍선 tip에 나타나게 되는 내용임
   st_value.text=ls_xdata
        st_value.x = parent.PointerX()
        st_value.y = parent.PointerY() - 65
        st_value.width=len(ls_xdata) * 30
        st_value.visible = true
        li_first=1
   end if
else
        st_value.visible = false
        li_first=0
End If

 

참조