|
Last change
on this file since 275 was 275, checked in by dai, 18 years ago |
|
（32ビットコンパイラ）
クラス情報取得時のクラス先読み処理で名前空間の関係が崩れてしまうバグを修正。
インクルードパスに'/'文字を含めたときに'
'として判断するようにした。
（ライブラリ）
ActiveBasic.Core名前空間を作成した（動的型情報に関する内部コードをここに移動）。
DateTimeクラスをSystem名前空間に入れた。
TimeSpanクラスをSystem名前空間に入れた。
TimeInfoクラスをSystem名前空間に入れた。
|
|
File size:
1.1 KB
|
| Line | |
|---|
| 1 | ' 実装中...
|
|---|
| 2 | '（※ まだ組み込んでいません）
|
|---|
| 3 |
|
|---|
| 4 |
|
|---|
| 5 | Namespace System
|
|---|
| 6 |
|
|---|
| 7 |
|
|---|
| 8 | Class TypeInfo
|
|---|
| 9 | Public
|
|---|
| 10 |
|
|---|
| 11 | Sub TypeInfo()
|
|---|
| 12 | End Sub
|
|---|
| 13 | Sub ~TypeInfo()
|
|---|
| 14 | End Sub
|
|---|
| 15 |
|
|---|
| 16 | Override Function GetType() As TypeInfo
|
|---|
| 17 | Return ActiveBasic.Core._System_TypeBase.selfTypeInfo
|
|---|
| 18 | End Function
|
|---|
| 19 |
|
|---|
| 20 | Override Function ToString() As String
|
|---|
| 21 | Return FullName()
|
|---|
| 22 | End Function
|
|---|
| 23 |
|
|---|
| 24 |
|
|---|
| 25 | '----------------------------------------------------------------
|
|---|
| 26 | ' Public properties
|
|---|
| 27 | '----------------------------------------------------------------
|
|---|
| 28 |
|
|---|
| 29 | Abstract Function BaseType() As TypeInfo
|
|---|
| 30 | Abstract Function FullName() As String
|
|---|
| 31 | Abstract Function IsArray() As Boolean
|
|---|
| 32 | Abstract Function IsByRef() As Boolean
|
|---|
| 33 | Abstract Function IsClass() As Boolean
|
|---|
| 34 | Abstract Function IsEnum() As Boolean
|
|---|
| 35 | Abstract Function IsInterface() As Boolean
|
|---|
| 36 | Abstract Function IsPointer() As Boolean
|
|---|
| 37 | Abstract Function IsValueType() As Boolean
|
|---|
| 38 | Abstract Function Name() As String
|
|---|
| 39 | Abstract Function Namespace() As String
|
|---|
| 40 |
|
|---|
| 41 |
|
|---|
| 42 |
|
|---|
| 43 | '----------------------------------------------------------------
|
|---|
| 44 | ' Public methods
|
|---|
| 45 | '----------------------------------------------------------------
|
|---|
| 46 |
|
|---|
| 47 | End Class
|
|---|
| 48 |
|
|---|
| 49 |
|
|---|
| 50 | End Namespace ' System
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
