原本想写个给整个类初始化的函数
发现参数太多,而且参数里居然还有二维数组
并且我不知道VB .NET如何调用带参数的构造函数
并且类中定义的类还要实例化为数组
所以我放弃写整体构造(初始化)函数
下面是VB .NET版本的
希望有谁给个C++的定义
只作参考哦! 这个已经过时了。
- Public Class Scene
- Public Name As String
- Public SceneIndex As Integer
- Public Class Image
- Public Name As String
- Public Path As String
- Public Index As Integer
- Public BGM As String
- Public Sub Init(ByVal InName As String, ByVal InPath As String, ByVal InIndex As Integer)
- Name = InName : Path = InPath : Index = InIndex
- End Sub
- End Class
- Public Class Character
- Public Location As Point 'Can use Enum
- Public Name As String
- Public CharIndex As Integer
- Public CG() As Image
- Public Sub Init(ByVal InLocation As Point, ByVal InName As String, ByVal InCharIndex As Integer, ByVal InCG() As Image)
- Location = InLocation : Name = InName : CharIndex = InCharIndex : CG = InCG
- End Sub
- End Class
- Public BG() As Image
- Public Characters() As Character
- Public Class Word
- Public WordType As Integer 'Can use Enum
- Public Class Selection
- Public Context As String
- Public Index As Integer
- Public JumpSceneIndex As Integer
- Public Sub Init(ByVal InContext As String, ByVal InIndex As Integer, ByVal InJumpSceneIndex As Integer)
- Context = InContext : Index = InIndex : JumpSceneIndex = InJumpSceneIndex
- End Sub
- End Class
- Public Selections() As Selection
- Public Sub Init(ByVal InWordType As Integer, ByVal InContextArray() As String, ByVal InIndexArray() As Integer, ByVal InJumpSceneIndexArray() As Integer)
- WordType = InWordType
- For i = 0 To InContextArray.Length - 1 Step 1
- Selections(i).Init(InContextArray(i), InIndexArray(i), InJumpSceneIndexArray(i))
- Next i
- End Sub
- End Class
- End Class
复制代码 |