比如：我表单from1,动态生成label ，有时候是生成20个，有时候是生成800个。
我想点击 label时，读取 labelxx.name这个名称？那就是 label的click事件。但我不可能1个个的写代码，就想到绑定。
我在表单中，自定义1个事件，给label绑定，我怎么知道是哪个 label点击了。。
* thisform.label_click
  messagebox(this.name) &&比如 thisform.MyLabel1.click点击了，我怎么知道是他的名称是 MyLabel1??
*************

* 动态生成 label的代码
nTop=20
nLeft=0
for i=1 to 100
 label_name = "MyLabel"+tran(i)
 nLeft=20+nLeft
  thisform.Map1.AddObject(label_name,'label')
   WITH thisform.Map1.&label_name
        .caption ="★"
        .autosize=.t.
        .visible=.t.
        .forecolor=RGB(255,0,255)
        .backstyle=0
        .top=nTop
        .left=nLeft
        .fontSize=9
    ENDWITH
    BINDEVENT(thisform.Map1.&label_name,"Click",thisform,"label_Click")
endfor

可以自己封装一个label类，不用BINDEVENT。

我刚测试了，可以。
动态生成 label 前，先设置
SET CLASSLIB TO FRM\MyLabel.VCX ADDI

lpara othisForm  在动态语句最上加这一行
下面的动态语句，全部替换 thisform 为 othisform
调用时，把表单直接作参数传入

直接用thsiform,会报错的

给每个控件的mousemove写一下过程， thisform.表单变量=this.name
thisform.表单变量  是表单的name