source: Include/Classes/System/Object.ab@ 201

Class Object

    ' 実行時型情報
    typeInfo As TypeInfo

Public

    Sub Object()
    End Sub
    Sub ~Object()
    End Sub

    ' 2つのオブジェクトが等しいかどうかを判断する
    Virtual Function Equals( object As Object ) As Boolean
        If This.GetHashCode() = object.GetHashCode() Then
            Return True
        Else
            Return False
        End If
    End Function
    Static Function Equals( objectA As Object, objectB As Object ) As Boolean
        Return objectA.Equals( objectB )
    End Function

    ' ハッシュコードを取得する
    Virtual Function GetHashCode() As Long
        Return VarPtr( This ) As Long
    End Function

    ' オブジェクトに関係する文字列を返す
    Virtual Function ToString() As String
        Return "Object"
    End Function

/*
    Function Operator Downcast() As VoidPtr
    End Function
*/
End Class