source:
Include/system/enum.sbp@
17
| Last change on this file since 17 was 1, checked in by , 19 years ago | |
|---|---|
| File size: 327 bytes | |
| Line | |
|---|---|
| 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.
