source:
Include/system/enum.sbp@
19
| Last change on this file since 19 was 1, checked in by , 18 years ago | |
|---|---|
| File size: 327 bytes | |
| Rev | Line | |
|---|---|---|
| [1] | 1 | Class EnumBase |
| 2 | Protected | |
| 3 | m_Value As Long | |
| 4 | Public | |
| 5 | Sub EnumBase(value As Long) | |
| 6 | m_Value=value | |
| 7 | End Sub | |
| 8 | Sub ~EnumBase() | |
| 9 | End Sub | |
| 10 | ||
| 11 | 'Abstract Function ToString() As String | |
| 12 | ||
| 13 | Sub Copy(ByRef obj As EnumBase) | |
| 14 | m_Value=obj.m_Value | |
| 15 | End Sub | |
| 16 | ||
| 17 | Function Operator() As Long | |
| 18 | Return m_Value | |
| 19 | End Function | |
| 20 | End Class |
Note:
See TracBrowser
for help on using the repository browser.
