Show/Hide Toolbars

XSharp

 

为没有构造函数的类自动生成 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)