object obj
for i= 1 to li_count//窗口内的控件数
if this.control[i].pointx()<0 and this.control[i].pointy()<0
and this.control[i].width+this.control[i].pointx()>0
and this.control[i].height+this.control[i].pointy()>0 then
obj=this.control[i].typeof()
choose case obj
case datewindow!
messagebox("","数据窗口")
case singlelineedit!
messagebox("","单行编辑框")
。。。。。。。。。
end choose
end if