为没有构造函数的类自动生成 Clipper 调用约定构造函数
-vo16[+|-]
+ | - | 指定 + 或 -vo16,编译器会自动生成与父类构造函数具有相同签名的构造函数 |
要在 Visual Studio 开发环境中设置该编译器选项,请执行以下操作
1.打开项目的 "属性"页面
2.点击 Dialect 选项卡
3.更改值
4.查看属性页
CLASS Event
EXPORT hWnd AS PTR
EXPORT uMsg AS DWORD
EXPORT wParam AS DWORD
EXPORT lParam AS LONG
EXPORT oWindow AS OBJECT
CONSTRUCTOR(_hWnd, _uMsg, _wParam, _lParam, _oWindow)
SELF:hWnd := _hWnd
SELF:uMsg := _uMsg
SELF:wParam := _wParam
SELF:lParam := _lParam
SELF:oWindow := _oWindow
END CLASS
CLASS ControlEvent INHERIT Event
END CLASS
在上述代码中,编译器将为 ControlEvent 类生成一个构造函数。该构造函数将把所有参数传递给 Event 类的构造函数。
生成的构造函数如下
CONSTRUCTOR(_hWnd, _uMsg, _wParam, _lParam, _oWindow)
SUPER(_hWnd, _uMsg, _wParam, _lParam, _oWindow)