दृश्य स्टूडियो मैक्रोज़ के साथ सिल्वरलाइट स्थानीयकरण स्वचालन

नमस्ते मैं सिल्वरलाइट तकनीक का उपयोग करके विकसित किए गए अनुप्रयोगों के स्थानीयकरण के स्वचालन के क्षेत्र में थोड़ी सी जमीनी साझेदारी करना चाहता हूं। इस पोस्ट (सिल्वरलाइट में स्थानीयकरण) को पढ़ने के बाद, यह स्पष्ट हो गया कि आपको सभी स्ट्रिंग स्थिरांक को संसाधन फ़ाइलों में डालना होगा, जिन्हें विशेष रूप से बुद्धिमान कार्य नहीं कहा जा सकता है। इसलिए, मैंने लंबा रास्ता तय किया और विजुअल स्टूडियो में अंतर्निहित मैक्रोज़ का उपयोग करके इस प्रक्रिया को स्वचालित करने का प्रयास किया।

इस तथ्य के कारण कि उन्हें कोड को थोड़ा कंघी करने के लिए भी मुझे आवश्यकता थी, पूर्ण स्वचालन (रूसी अक्षरों की खोज और उन्हें संसाधनों में डालने के साथ सभी xaml फ़ाइलों की पूर्ण स्कैन) को छोड़ने का फैसला किया गया था। साथ ही, मैं .cs फ़ाइलों में स्ट्रिंग स्थिरांक को बदलने के सामान्य स्वचालन के साथ नहीं आ सका।

विश्लेषण के बाद, निम्नलिखित मैक्रो आवश्यकताओं को विकसित किया गया था:

• उपयोगकर्ता द्वारा चयनित वाक्यांश का विश्लेषण करें (एक विशिष्ट कुंजी संयोजन दबाकर);
• वाक्यांश का अनुवाद Google अनुवाद में करें (ताकि संसाधन के नाम का आविष्कार करके उपयोगकर्ता को तनाव न दें);
• पहले से इंगित संसाधनों में एक वाक्यांश जोड़ें (और यह आवश्यक है कि परिवर्तन वीएस के माध्यम से किए जाएं, क्योंकि हमें एक उत्पन्न प्रॉक्सी वर्ग की आवश्यकता है);
• संसाधन द्वारा बाध्यकारी के साथ उपयोगकर्ता द्वारा चयनित वाक्यांश को बदलें।

विजुअल स्टूडियो में एक अंतर्निहित मैक्रो संपादक है। इसे कॉल करने के लिए, आपको मेनू से टूल / मैक्रोज़ / मैक्रोज़ आईडीई का चयन करना होगा। शुरू करने से पहले, आपको मैक्रोज़ के साथ एक फ़ाइल बनाना होगा (कोड VB .Net में लिखा गया है)। मापदंडों के बिना कोई भी सार्वजनिक प्रक्रिया मैक्रोज़ की सूची में दिखाई देती है और इसे गर्म कुंजी दबाकर या मैक्रो एक्सप्लोरर के माध्यम से बुलाया जा सकता है।

कार्य 1. वीएस में चयनित शब्द की परिभाषा

Dim doc As Document = DTE.ActiveDocument Dim d As TextDocument = doc.Object Dim bp = d.Selection.AnchorPoint.CreateEditPoint, ep = d.Selection.BottomPoint.CreateEditPoint Dim caption As String = bp.GetText(ep) If (String.IsNullOrWhiteSpace(caption)) Then Exit Sub '       -   

हम सक्रिय दस्तावेज़ प्राप्त करते हैं, इसे एक पाठ दस्तावेज़ (पाठ के साथ काम करने के लिए एक अधिक सुविधाजनक वर्ग) में लाते हैं। हमें दो अंक मिलते हैं: चयन की शुरुआत और अंत (यह doc.Selection.Text के माध्यम से आसान हो सकता था, लेकिन जब आप स्टूडियो में एक नई फ़ाइल खोलते हैं और संपादित फ़ाइल पर वापस आते हैं, तो चयन विफल हो जाता है, जो बहुत असुविधाजनक है, और ये बिंदु हमें पाठ चयन को बहाल करने में मदद करेंगे। )।

कार्य 2. संसाधन नाम प्राप्त करना

संसाधन का नाम पाने का सबसे आसान तरीका हाइलाइट किए गए वाक्यांश को अंग्रेजी में अनुवाद करना है (ध्यान दें: सबसे आसान तरीका सबसे सही नहीं है)। अनुवाद के लिए Google अनुवाद सेवा का उपयोग करने का निर्णय लिया गया, क्योंकि इस सेवा में एक साधारण एपीआई है
अनुरोध के परिणामस्वरूप, हमें निम्न JSON ऑब्जेक्ट मिलता है:
{"responseData": {"translatedText":"Organization Structure"}, "responseDetails": null, "responseStatus": 200}


 Private Function ConvertToResourceName(ByVal text As String) As String Dim result As String = (New WebClient()).DownloadString("http://ajax.googleapis.com/ajax/services/language/translate?v=1.0&q=" + text + "&langpair=ru|en") Dim stream As New MemoryStream(Encoding.Unicode.GetBytes(result)) Dim serializer As New System.Runtime.Serialization.Json.DataContractJsonSerializer(GetType(TranslateResult)) Return String.Join("", CType(serializer.ReadObject(stream), TranslateResult).responseData.translatedText _ .Split(" ", ".", ",", "!", "(", ")", vbCrLf, vbCr) _ .Where(Function(word) Not String.IsNullOrWhiteSpace(word)) _ .Select(Function(word) word(0).ToString().ToUpper() + word.Substring(1)) _ .ToArray()) End Function 

स्थानांतरण प्राप्त करने के लिए, आपको Google सेवा के लिए एक विशेष अनुरोध पूरा करना होगा और इसे पाठ के साथ एक पंक्ति में पारित करना होगा। केवल एक चीज जिसने इस कोड को काफी जटिल कर दिया, वह यह था कि परिणाम सिर्फ एक स्ट्रिंग नहीं है, बल्कि एक JSON ऑब्जेक्ट है जिसे पहले डीरिएराइज़ करने की आवश्यकता है। Deserialization के लिए, DataContractJsonSerializer वर्ग का उपयोग किया गया था। मैक्रोज़ में DataContractJsonSerializer का उपयोग करने के लिए, आपको संदर्भ के लिए असेंबली System.Runtime.Serialization.dll को जोड़ना होगा और Google के उत्तर के अनुरूप वर्ग को लागू करना होगा, अधिक सटीक रूप से दो कक्षाएं।

नोट: नाम का उपयोग करने से पहले, आप उपयोगकर्ता को अनुवाद के सही विकल्प (समायोजन की संभावना के साथ) की पुष्टि के लिए अनुरोध दे सकते हैं।

नोट: LINQ के लिए काम करने के लिए, आपको System.Core.dll में संदर्भ जोड़ना होगा

 <DataContract()> _ Public Class TranslateResult <DataContract()> _ Public Class ResponseDataClass <DataMember()> _ Public translatedText As String <DataMember()> _ Public responseDetails As String <DataMember()> _ Public responseStatus As String End Class <DataMember()> _ Public responseData As ResponseDataClass End Class 

अनुवाद प्राप्त करने के बाद, आपको परिणाम को थोड़ा सजाने की आवश्यकता है, अर्थात्: सभी निषिद्ध पात्रों को हटा दें और CamelCase शैली लाएं।

कार्य 3. संसाधनों में एक नई पंक्ति जोड़ना

प्रारंभ में, आपको संसाधन संपादक के साथ विंडो को सक्रिय करना होगा, या VS में एक नई विंडो खोलना होगा। इसके अलावा, अगर एक नई विंडो खोली गई थी, तो फोकस उस पर चला जाएगा। उपयोगकर्ता को भ्रमित न करने के लिए, फ़ोकस वापस करना आवश्यक है।

 Private Function FindWindow(ByVal fileName As String) As Window For i As Integer = 1 To DTE.Windows.Count If Not (DTE.Windows.Item(i).ProjectItem Is Nothing) Then If (DTE.Windows.Item(i).ProjectItem.FileNames(0) = fileName) Then Return DTE.Windows.Item(i) End If End If Next Dim oldactive As Document = DTE.ActiveDocument Dim newf = DTE.ItemOperations.OpenFile(fileName, Constants.vsViewKindTextView) oldactive.Activate() Return newf End Function 

चूंकि विभिन्न भाषाओं के लिए कई संसाधन फाइलें हो सकती हैं, हम उन्हें एक सरणी में याद करते हैं।

 Dim resourceFiles() As String = {" \ProjectResources.resx", _ " \ProjectResources.kk-KZ.resx"} 

आप इस टुकड़े को ऑप्टिमाइज़ कर सकते हैं और संसाधनों के साथ फ़ाइलों को स्वचालित रूप से खोजने का प्रयास कर सकते हैं।
अगला, प्रत्येक संसाधन फ़ाइल के माध्यम से जाएं, इसे खोलें, समान नाम के साथ संसाधन की उपलब्धता की जांच करें, और यदि यह नहीं है, तो इसे जोड़ें।

 Dim paramName As String = ConvertToResourceName(caption) For Each item As String In resourceFiles Dim textDocument As TextDocument = FindWindow(item).Document.Object Dim startPoint = textDocument.StartPoint.CreateEditPoint, endPoint = textDocument.EndPoint.CreateEditPoint Dim root = XElement.Parse(startPoint.GetText(endPoint)) Dim param As XElement = root.Elements("data").FirstOrDefault(Function(el) el.Attribute("name") = paramName) If (param Is Nothing) Then root.Add(New XElement("data", New XAttribute("name", paramName) _ , New XAttribute(XName.Get("space", "http://www.w3.org/XML/1998/namespace"), "preserve") _ , New XElement("value", caption))) startPoint.ReplaceText(endPoint, root.ToString(), vsEPReplaceTextOptions.vsEPReplaceTextAutoformat) textDocument.Parent.Save() End If Next 

संसाधन फ़ाइल क्रमशः डेटा फ़ील्ड के साथ एक सरल xml-ku है, फ़ाइल की पूरी सामग्री को सीधे संशोधित करने का सबसे आसान तरीका (सामग्री एक खुले दस्तावेज़ से प्राप्त की जाती है) और फिर पूरे दस्तावेज़ को अपडेट करें।
दस्तावेज़ को संशोधित करने के बाद, आपको परिवर्तनों को सहेजने की आवश्यकता है, जो एक प्रॉक्सी वर्ग की पीढ़ी को जन्म देगा।
नोट: XElement काम करने के लिए, System.Xml, System.Xml.Linq के संदर्भ जोड़ें;

टास्क 4. यूजर-सेलेक्ट किए गए शब्द को बाइंडिंग टेम्प्लेट से नए संसाधन में बदलें

इस तथ्य के कारण कि xaml / cs / vb फ़ाइलों में संसाधनों की पहुंच अलग-अलग है, खुली फ़ाइल एक्सटेंशन की जांच करना और इसके अनुसार एक लाइन बनाना आवश्यक है।

 Dim replaceString As String Select Case Path.GetExtension(doc.FullName).ToLower() Case ".xaml" : replaceString = "{Binding Source={StaticResource ResourceProvider},Path=ProjectResources." + paramName + "}" Case ".cs" : replaceString = "ProjectResources." + paramName Case Else : replaceString = paramName End Select bp.ReplaceText(ep, replaceString, 0) '   d.Selection.MoveToPoint(bp) d.Selection.SwapAnchor() d.Selection.MoveToPoint(ep, True) '    ,   

सभी मैक्रो उपयोग करने के लिए तैयार हैं।

मैक्रो का उपयोग करने के फायदे / नुकसान

• कीबोर्ड अनुभाग में मेनू आइटम टूल्स / विकल्पों के माध्यम से एक मैक्रो कॉल को गर्म कुंजियों पर लटका दिया जा सकता है;
• कोड को ठीक करना बहुत आसान है, अगर आपको इसे थोड़ा संशोधित करने की आवश्यकता है (उदाहरण के लिए, आप संसाधनों के साथ फाइल खोजने के लिए एक जटिल तंत्र नहीं लिख सकते हैं, लेकिन कोड में निरंतर पथ बनाएं और यदि आवश्यक हो तो उन्हें सही करें);
• काफी आसान कोड डिबगिंग;
• VS के साथ अच्छा एकीकरण।

स्पष्ट दोषों का

• आप C # में कोड नहीं लिख सकते हैं;
• कम उत्पादकता, काफी समय के लिए शुरू;
• लगातार क्रैश, विशेष रूप से डिबगिंग के दौरान।

लेख संसाधन फ़ाइलों के गठन को स्वचालित करने के लिए एक सामान्य दृष्टिकोण प्रदान करता है, इसलिए आप इसे आवश्यकतानुसार समायोजित कर सकते हैं।