public ga_Keys[28]

看了半天终于发现你是在这里添加的28个按钮

FOR ln_Index = 1 TO ALEN(ga_Keys,1)
            lc_KeyName = "Key_" + PADL(ln_Index, 2, '0')
            This.AddObject(lc_KeyName, "C_BUTTON", ga_Keys[ln_Index])

是不是啊 555 知道的函数多久是好啊

老大 看了几遍 有个地方没理解

DEFINE CLASS C_BUTTON AS CommandButton
    Width = 40
    Height = 32
    FontName = "Terminal"

 
    *- 键名属性
    Key = ""
  

    PROCEDURE Init(t_Key)
        WITH This
            .Key = t_Key
            .Caption = .Key.Caption
        ENDWITH
    ENDPROC

这个Key是个属性？ 那么一个属性为什么还能有属性  .Key.Caption？

这样一个类只要用自己的属性获取另一个类的对象名就能包含其他类的对象了 也太强悍了吧

看了下这个介绍 有点问题

addobject 方法 : 运行时，在容器对象中添加对象。

语法 : Object.AddObject(cName, cClass [, cOLEClass] [, aInit1, aInit2 ...])

参数
cName : 指定引用新对象的名称。
cClass : 指定添加对象所在的类。
cOLEClass : 指定添加对象的 OLE 类。
aInit1, aInit2 ... : 指定传给新对象的 Init 事件的参数

cOLEClass : 指定添加对象的 OLE 类。究竟怎么理解好 ？是不是比cClass : 指定添加对象所在的类还要高级的一个东西？

那么现在这个程序的 This.AddObject(lc_KeyName, "C_BUTTON", ga_Keys[ln_Index])
ga_Keys[]算不算OLE类　

这样啊　明白了
很奇怪啊　ＶＦＰ的数组不用先指定他的类型　而是根据赋给他的值来确定他的类型
传参数时　竟然可以把一个大堆参数放到一个数组中

哦　这样啊　

那你的程序里面变量的下划线前一般都有两个小写字符　如ga_, gc_, lo_, ln_， tc_......这些有什么具体所指吗
一时没领悟过来

还有就是变量动态变化有什么利弊 为什么C语言要把他固定起来？

哦 好的

SET DECIMALS TO 4
ON ERROR DO errHandler WITH ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM( ), LINENO( )
Main()
ON ERROR

CLEAR ALL
RETURN

SET DECIMALS TO 4这个是定小数点为4位 放这里有什么用处 ? 后面用到这个吗
 
为什么你的main()函数里不写个return而要把他放到这里？

还有救是
PROCEDURE errHandler(merror, mess, mess1, mprog, mlineno)
    MESSAGEBOX(Str(mlineno)+"表达式错误：" + mess)
ENDPROC
的参数mess在编辑环境里是有颜色的 貌似是系统规定过的标识符 不是说参数不能和系统的东西相同吗？
message()和message(1)的区别是什么啊


[ 本帖最后由 有容就大 于 2012-9-19 14:52 编辑 ]