示例#1
0
        public ActionResult Index()
        {
            //菜单简繁体转换
            var       localID     = Thread.CurrentThread.CurrentUICulture.Name == "zh-CN" ? 0 : 2;
            VbStrConv strTransfer = localID == 0? Microsoft.VisualBasic.VbStrConv.SimplifiedChinese : Microsoft.VisualBasic.VbStrConv.TraditionalChinese;


            return(View());
        }
示例#2
0
        static void WriteChanged_SemiVoiced(VbStrConv mode)
        {
            var changed = EnumerableHelper.RangeChars(char.MinValue, char.MaxValue)
                          .Select(c => new { before = c, after = Strings.StrConv($"{c}゚", mode) })
                          .Where(_ => _.after.Length == 1)
                          .Select(_ => $"{ToMessage1(_.before)} > {ToMessage2(_.after[0])}")
                          .ToArray();

            File.WriteAllLines($"VBStrings-{mode.ToString().Replace(", ", "")}-SemiVoiced.txt", changed, Encoding.UTF8);
        }
示例#3
0
 // https://docs.microsoft.com/ja-jp/dotnet/api/microsoft.visualbasic.strings.strconv?view=net-5.0
 public static string StrConv(string str, VbStrConv Conversion)
 {
     // TODO 要る分だけ実装ないし完全に置き換える
     // TODO Impl Wide
     switch (Conversion)
     {
     default:
         return(str);
     }
 }
示例#4
0
        private static VbStrConv ConvertToEnum(SearchText search)
        {
            VbStrConv vbStrConv = VbStrConv.None;

            foreach (var v in search.VbStrConv)
            {
                vbStrConv += (int)v;
            }

            return(vbStrConv);
        }
示例#5
0
        static void WriteChanged_Narrow(VbStrConv mode)
        {
            // 他言語の文字は "?" に変換されます。
            var changed = EnumerableHelper.RangeChars(char.MinValue, char.MaxValue)
                          .Select(c => new { before = c, after = Strings.StrConv(c.ToString(), mode) })
                          .Where(_ => _.before.ToString() != _.after)
                          .Where(_ => TargetChars.Contains(_.before) || _.after != "?")
                          .Select(_ => $"{ToMessage1(_.before)} > {(_.after.Length == 1 ? ToMessage2(_.after[0]) : _.after)}")
                          .ToArray();

            File.WriteAllLines($"VBStrings-{mode.ToString().Replace(", ", "")}.txt", changed, Encoding.UTF8);
        }
示例#6
0
        private static string convertlong(string xml, VbStrConv convert)
        {
            string    output     = "";
            const int buffersize = 10000;
            int       length     = xml.Length;

            for (int i = 0; i < length - buffersize; i += buffersize) // put it through in Chunks
            {
                output += Strings.StrConv(xml.Substring(i, buffersize), convert);
            }
            output += Strings.StrConv(xml.Substring(length - (length % buffersize), length % buffersize), convert); // last bit is < buffersize
            return(output);
        }
示例#7
0
 /// <summary>
 ///
 /// </summary>
 /// <param name="str">文本</param>
 /// <param name="Conversion">被翻译成的语言</param>
 /// <param name="LocaleID"></param>
 /// <returns></returns>
 public static string StrConv(string str, VbStrConv Conversion, int LocaleID = 0)
 {
     try
     {
         ChineseTranslateDirection chineseTranslate = (Conversion == VbStrConv.SimplifiedChinese) ?
                                                      ChineseTranslateDirection.TraditionalToSimplified : ChineseTranslateDirection.SimplifiedToTraditional;
         string value = ChineseTranslate.Convert(str, chineseTranslate);
         return(value);
     }
     catch (Exception ex)
     {
         return(str);//非Wwindows可能会报错~
     }
 }
示例#8
0
 /* Converter Methods*/
 private void tradSimpConvert(VbStrConv convert)
 {
     Word.Range currentRange = Globals.ThisAddIn.Application.Selection.Range;
     if (currentRange.Text == null)
     {
         System.Windows.Forms.MessageBox.Show("Please select some text.");
     }
     else
     {
         // don't use get_XML(), converts equations to pictures, use WordOpenXML
         currentRange.InsertXML(convertlong(currentRange.WordOpenXML, convert));
         currentRange.Select();
     }
 }
示例#9
0
        // Perform a string conversion (we don't support simplified/traditional
        // conversions or linguistic casing yet).
        public static String StrConv
            (String str, VbStrConv Conversion,
            [Optional][DefaultValue(0)] int LocaleID)
        {
            if (str == null)
            {
                return(null);
            }
            if ((Conversion & VbStrConv.Wide) != 0)
            {
                str = Utils.ToWide(str);
            }
            else if ((Conversion & VbStrConv.Narrow) != 0)
            {
                str = Utils.ToNarrow(str);
            }
            if ((Conversion & VbStrConv.Katakana) != 0)
            {
                str = Utils.ToKatakana(str);
            }
            else if ((Conversion & VbStrConv.Hiragana) != 0)
            {
                str = Utils.ToHiragana(str);
            }
            switch (Conversion & (VbStrConv)0x0003)
            {
            case VbStrConv.UpperCase:
            {
                str = GetTextInfo(LocaleID).ToUpper(str);
            }
            break;

            case VbStrConv.LowerCase:
            {
                str = GetTextInfo(LocaleID).ToLower(str);
            }
            break;

            case VbStrConv.ProperCase:
            {
                str = GetTextInfo(LocaleID).ToTitleCase(str);
            }
            break;
            }
            return(str);
        }
示例#10
0
        public static string StrConv(string str, VbStrConv Conversion, int LocaleID = 0)
        {
            switch (Conversion)
            {
            case VbStrConv.Wide:
            {
                var result = "";
                for (int i = 0; i < str.Length; ++i)
                {
                    char c     = str[i];
                    char found = '\x0';
                    if (ToWide.TryGetValue(c, out found))
                    {
                        result += found;
                    }
                    else
                    {
                        result += ' ';
                        result += c;
                    }
                }
                return(result);
            }

            case VbStrConv.Narrow:
            {
                var result = "";
                for (int i = 0; i < str.Length; ++i)
                {
                    char c     = str[i];
                    char found = '\x0';
                    if (ToNarrow.TryGetValue(c, out found))
                    {
                        result += found;
                    }
                    else
                    {
                        result += c;
                    }
                }
                return(result);
            }
            }
            return(str);
        }
示例#11
0
        private bool TryStrConvUpdate(string original, ConversionItem item, out string updatedText)
        {
            var search      = item.Search;
            var replacement = item.Replacement;

            updatedText = null;

            if (SearchTextValid(search))
            {
                VbStrConv vbStrConv = ConvertToEnum(search);

                try
                {
                    if (settings.SourceCulture != null)
                    {
                        updatedText = original.RegexReplace(search.Text, replacement, search.CaseSensitive,
                                                            m => Strings.StrConv(m.Value, vbStrConv, settings.SourceCulture.LCID));
                    }
                    else if (vbStrConv.HasFlag(VbStrConv.Hiragana) || vbStrConv.HasFlag(VbStrConv.Katakana))
                    {
                        updatedText = original.RegexReplace(search.Text, replacement, search.CaseSensitive,
                                                            m => Strings.StrConv(m.Value, vbStrConv, new CultureInfo("ja-JP").LCID));
                    }
                    else
                    {
                        updatedText = original.RegexReplace(search.Text, replacement, search.CaseSensitive,
                                                            m => Strings.StrConv(m.Value, vbStrConv));
                    }
                }
                catch (ArgumentException e)
                {
                    Reporter.Report(this, ErrorLevel.Warning, $"Error {search.Text}: {e.Message}", "Exception happened");
                }
            }

            // String compare has to be always case-sensitive here
            return((updatedText != null) && !original.NormalStringCompare(updatedText, true, settings.SourceCulture));
        }
        public string StrConv(string s)
        {
            VbStrConv conv = VbStrConv.None;

            switch (m_conv)
            {
            case CasingEnum.None:
                conv = VbStrConv.None;
                break;

            case CasingEnum.Upper:
                conv = VbStrConv.Uppercase;
                break;

            case CasingEnum.Lower:
                conv = VbStrConv.Lowercase;
                break;

            case CasingEnum.Proper:
                conv = VbStrConv.ProperCase;
                break;
            }
            return(Microsoft.VisualBasic.Strings.StrConv(s, conv, 0));
        }
示例#13
0
 private bool ToKatakana(KakasiReader input, TextWriter output, VbStrConv conv)
 {
     if (!IsHiragana(input.Get()))
     {
         return(false);
     }
     while (true)
     {
         int ch = input.Get();
         if (IsHiragana(ch))
         {
             input.Consume(1);
             foreach (char c in Strings.StrConv(((char)ch).ToString(), conv).ToCharArray())
             {
                 output.Write(c);
             }
         }
         else
         {
             break;
         }
     }
     return(true);
 }
示例#14
0
 public static string StrConv(string str, VbStrConv strConv, int flag)
 {
     return(str);
 }
示例#15
0
	// Perform a string conversion (we don't support simplified/traditional
	// conversions or linguistic casing yet).
	public static String StrConv
				(String str, VbStrConv Conversion,
				 [Optional][DefaultValue(0)] int LocaleID)
			{
				if(str == null)
				{
					return null;
				}
				if((Conversion & VbStrConv.Wide) != 0)
				{
					str = Utils.ToWide(str);
				}
				else if((Conversion & VbStrConv.Narrow) != 0)
				{
					str = Utils.ToNarrow(str);
				}
				if((Conversion & VbStrConv.Katakana) != 0)
				{
					str = Utils.ToKatakana(str);
				}
				else if((Conversion & VbStrConv.Hiragana) != 0)
				{
					str = Utils.ToHiragana(str);
				}
				switch(Conversion & (VbStrConv)0x0003)
				{
					case VbStrConv.UpperCase:
					{
						str = GetTextInfo(LocaleID).ToUpper(str);
					}
					break;

					case VbStrConv.LowerCase:
					{
						str = GetTextInfo(LocaleID).ToLower(str);
					}
					break;

					case VbStrConv.ProperCase:
					{
						str = GetTextInfo(LocaleID).ToTitleCase(str);
					}
					break;
				}
				return str;
			}
 public static string StrConv(string str, VbStrConv Conversion, int LocaleID)
 {
 }
示例#17
0
 public static string StrConv(string str, VbStrConv Conversion, int LocaleID = 0)
 {
     throw new NotImplementedException();
     //return Microsoft.VisualBasic.Strings.StrConv(str, (Microsoft.VisualBasic.VbStrConv)Conversion, LocaleID);
 }
 public static string StrConv(string str, VbStrConv Conversion, int LocaleID)
 {
 }