PageRenderTime 41ms CodeModel.GetById 18ms RepoModel.GetById 0ms app.codeStats 0ms

/Common/Utilities/MediaNFOAudio.vb

#
Visual Basic | 34 lines | 28 code | 6 blank | 0 comment | 0 complexity | b01636f485ac3032f50d6e6120d09ea5 MD5 | raw file
Possible License(s): GPL-2.0
  1. Public Structure str_MediaNFOAudio
  2. Dim language As String
  3. Dim codec As String
  4. Dim channels As String
  5. Dim bitrate As String
  6. Sub New(SetDefaults As Boolean) 'When called with new keyword & boolean constant SetDefault (either T or F), initialises all values to defaults to avoid having some variables left as 'nothing'
  7. language = ""
  8. codec = ""
  9. channels = ""
  10. bitrate = ""
  11. End Sub
  12. Shared Widening Operator CType(ByVal Input As Nfo.AudioDetails) As str_MediaNFOAudio
  13. Dim Temp As New str_MediaNFOAudio(True)
  14. Temp.codec = Input.Codec
  15. Temp.bitrate = Input.Bitrate
  16. Temp.language = Input.Language
  17. Temp.channels = Input.Channels
  18. Return Temp
  19. End Operator
  20. Shared Widening Operator CType(ByVal Input As str_MediaNFOAudio) As Nfo.AudioDetails
  21. Dim Temp As New Nfo.AudioDetails
  22. Temp.Codec.Value = Input.codec
  23. Temp.Bitrate.Value = Input.bitrate
  24. Temp.Channels.Value = Input.channels
  25. Temp.Language.Value = Input.language
  26. Return Temp
  27. End Operator
  28. End Structure