DataWindowChild Ldw_Column,Ldw_Child
String Ls_Column,Ls_Name,Ls_Pointer
Long m,Ll_Row
//得到有下拉數據窗口列的子數據窗口名
FOR m = 1 TO long(this.object.datawindow.column.count)
Ls_Column = this.describe("#" + String(m) + ".name")
IF this.getchild(Ls_Column,Ldw_Column) = 1 then
Ls_Name = Ls_Column
this.getchild(Ls_Name,Ldw_Child)
IF hwndchild = handle(Ldw_Child) THEN
//2311是在dddw中mousemove(用戶移動鼠標)的資訊
IF notificationcode = 2311 THEN
//得到鼠標所在的行的名稱及行號
Ls_Pointer = Ldw_Child.getobjectatpointer()
Ll_Row = long(mid(Ls_Pointer,pos(Ls_Pointer,"~t") + 1))
//移動到鼠標所在的行
IF Ldw_Child.getrow() <> Ll_Row AND Ll_Row > 0 THEN
Ldw_Child.scrolltorow(Ll_Row)
END IF
END IF
END IF
ELSE
RETURN
END IF
NEXT