تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف اعرض لغات مثل العربية في ritchtextbox
#1
Photo 
السلام عليكم
اعمل على برنامج للترجمة لكن عندما احاول الترجمة الى اللغات التالية (العربية .الصينية.اليابانية.اليونانية.....) احصل على مربعات في صندوق النص


من فضلكم كيف استطيع حل هذه المشكلة وشكرا
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

ما هي طريقة الترجمة؟

لأنها إذا كانت من موقع مباشرة فيجب عليك تحويلها إلى الترميز الافتراضي لكي تظهر الحروف بشكل صحيح
الرد
تم الشكر بواسطة:
#3
اخي العزيز

استخدم ترميز UTF8 للتحويل الى العربية او الصينية او اللغات اللاتينية حسب اعتقادي

تحياتي
الرد
تم الشكر بواسطة: ali.alfoly
#4
Photo 
هذا هو الكود المستعمل
Sub translateit()
كود :
[b]
    Dim languagePair As String
                   Select Case langCombo.SelectedItem
            Case "French"
                languagePair = "en|fr"
                    End Select
        Dim input As String = transTxt.Text
        Dim url As String = [String].Format("http://www.google.com/translate_t?hl=en&ie=UTF8&text={0}&langpair={1}", input, languagePair)
        Dim webClient As New WebClient()
        webClient.Encoding = System.Text.Encoding.UTF8
        Dim result As String = webClient.DownloadString(url)
        result = result.Substring(result.IndexOf("<span title=""") + "<span title=""".Length)
        result = result.Substring(result.IndexOf(">") + 1)
        result = result.Substring(0, result.IndexOf("</span>"))
                    resultTxt.Text = WebUtility.HtmlDecode(result.Trim())
                   End Sub[/b]
الرد
تم الشكر بواسطة:
#5
مارايك بالطريقة التالية ابسط بكثير لكنها ليست ماهرة
اولا نكتب السطر التالي
كود :
http://translate.google.com/#flang/slang/word
ثم تضيف الادوات التالية
كود :
Dim all As String = url.Text.Replace("flang", ComboBox1.Text.Trim)
        all = all.Replace("slang", ComboBox2.Text.Trim)
        all = all.Replace("word", txtinput.Text)
        txtoutput.Navigate(all)
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة في إخراج المعطيات عند طباعة الكلمات باللغة العربية karimvb2008 4 103 08-11-18, 08:17 PM
آخر رد: rmnr
  [VB.NET] طلب كود اضافة لغات للبرنامج XBOOBX 2 69 31-10-18, 11:36 PM
آخر رد: elgokr
  [VB.NET] معرفة اليوم باللغة العربية محمد بوقزاحة 5 154 15-10-18, 09:38 PM
آخر رد: ابراهيم ايبو
  ممكن مساعدة في ارسال رسالة بي لغة العربية الزوي 22 679 12-08-18, 04:56 AM
آخر رد: الزوي
  [VB.NET] تعدد لغات برنامجك YousefOkasha 4 257 30-06-18, 11:56 AM
آخر رد: mmali127
  تصدير البيانات الى PDF باستخدام ITextSharp لايدعم اللغة العربية فاطمة غ 9 1,617 12-05-18, 12:51 AM
آخر رد: han
  [VB.NET] عند استيراد قيم نصية من ملف نصي تظهر الكلمات العربية بالشكل ؟؟؟؟؟ يا ريت اجد يساعدني alaa.altunsi 3 228 06-04-18, 02:12 PM
آخر رد: alaa.altunsi
  [VB.NET] استفسار :- اللغة العربية في قواعد البيانات dubai.eig 2 178 21-01-18, 08:20 PM
آخر رد: dubai.eig
  [VB.NET] كود في الفيجول بيسك لقرأة النص بلغة العربية والانجليزية spark 1 230 20-12-17, 10:48 PM
آخر رد: zinom
  مشكل اللغة العربية في vb.net fouadhdfouad 4 378 23-11-17, 07:57 PM
آخر رد: fouadhdfouad

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم