PageVersionExport.xaml.vb 842 B

123456789101112131415161718192021222324252627
  1. Public Class PageVersionExport
  2. Private CurrentVersion As McVersion = PageVersionLeft.Version
  3. Private Type As ModpackType = ModpackType.Compressed
  4. Private SelectedSaves As New List(Of Integer)
  5. Private ReadOnly Property Saves As List(Of String)
  6. Get
  7. If Directory.Exists(CurrentVersion.Path & "saves\") Then
  8. Return Directory.EnumerateDirectories(CurrentVersion.Path & "saves\").ToList
  9. End If
  10. Return New List(Of String)
  11. End Get
  12. End Property
  13. Private Sub PageVersionExport_Loaded(sender As Object, e As RoutedEventArgs) Handles Me.Loaded
  14. CurrentVersion = PageVersionLeft.Version '各个版本不同,每次都需要重新加载
  15. TbExportName.HintText = CurrentVersion.Name
  16. End Sub
  17. #Region "控件事件"
  18. #End Region
  19. End Class