Почему динамические литералы XML не наследуют пространство имен по умолчанию
У меня есть XElement, который мне нужно создать с помощью динамических литералов xml / встроенных выражений, и он мне нужен для наследования пространства имен по умолчанию. Это кажется невозможным из-за всего, что я пробовал. Кто-нибудь знает, как заставить это работать?
Например
Imports <xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation">
Sub CreateXAML()
Dim obj = "Rectangle"
Dim objFill As String = obj & ".Fill"
Dim myXML As XElement = <<%= obj %>><<%= objFill %>>no namespace</></>
Dim myXML2 As XElement = <Path><Path.Fill>inherits namespace</Path.Fill></Path>
MsgBox(myXML.ToString & vbCrLf & myXML2.ToString)
End Sub
Первый, myXML
, создается не по умолчанию ns, а вторым, myXML2
, является.
1 ответ
Http://msdn.microsoft.com/en-us/library/bb675177.aspx задокументировано в разделе "Глобальные пространства имен и встроенные выражения", что он не будет работать, но статья не предлагает обходного пути или решения. У меня была эта потребность и раньше, и только методом проб и ошибок я смог заставить его работать, заранее создав элемент с помощью пространства имен, как здесь:
Imports <xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation">
Sub CreateXAML()
Dim shape = "Rectangle"
Dim obj = <<%= "{http://schemas.microsoft.com/winfx/2006/xaml/presentation}" & shape %>></>
Dim objFill = <<%= "{http://schemas.microsoft.com/winfx/2006/xaml/presentation}" & shape %>></>
Dim myXML As XElement = <<%= obj %>><<%= objFill %>>has namespace</></>
Dim myXML2 As XElement = <Rectangle><Rectangle.Fill>inherits namespace</Rectangle.Fill></Rectangle>
MsgBox(myXML.ToString & vbCrLf & myXML2.ToString)
End Sub
Вы можете задаться вопросом, почему утверждение "Импорт" все еще там. Ну, он используется в случае добавления нединамического XElement для наследования глобального пространства имен. Как это:
<<%= obj %>><<%= objFill %>><Text>has namespace</Text></></>