Type TransferListType ( _
Index As Int, _
Title As String, _
ChildFiles As List, _
ChildExists As Boolean, _
Expanded As Boolean, _
TotalSize As Long, _
TotalDone As Long _
)
Type SingleFileTransferType ( _
Index As Int, _
FilePath As String, _
FileDate As Long, _
FileStatus As String, _
FileProgress As Int, _
FileSize As Long, _
FileDone As Long, _
OpType As Int)
Dim TransferList As List