تقييم الموضوع :
  • 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)
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] الكتابة باللغة العربية أبوسعود 5 148 09-01-19, 10:01 PM
آخر رد: salah mansour
  [VB.NET] مشكلة في إخراج المعطيات عند طباعة الكلمات باللغة العربية karimvb2008 2 181 07-11-18, 12:57 PM
آخر رد: elgokr
  [VB.NET] طلب كود اضافة لغات للبرنامج XBOOBX 2 113 31-10-18, 11:36 PM
آخر رد: elgokr
  [VB.NET] معرفة اليوم باللغة العربية محمد بوقزاحة 5 214 15-10-18, 09:38 PM
آخر رد: ابراهيم ايبو
  ممكن مساعدة في ارسال رسالة بي لغة العربية الزوي 22 830 12-08-18, 04:56 AM
آخر رد: الزوي
  [VB.NET] تعدد لغات برنامجك YousefOkasha 4 309 30-06-18, 11:56 AM
آخر رد: mmali127
  تصدير البيانات الى PDF باستخدام ITextSharp لايدعم اللغة العربية فاطمة غ 9 1,713 12-05-18, 12:51 AM
آخر رد: han
  [VB.NET] عند استيراد قيم نصية من ملف نصي تظهر الكلمات العربية بالشكل ؟؟؟؟؟ يا ريت اجد يساعدني alaa.altunsi 3 284 06-04-18, 02:12 PM
آخر رد: alaa.altunsi
  [VB.NET] استفسار :- اللغة العربية في قواعد البيانات dubai.eig 2 217 21-01-18, 08:20 PM
آخر رد: dubai.eig
  [VB.NET] كود في الفيجول بيسك لقرأة النص بلغة العربية والانجليزية spark 1 265 20-12-17, 10:48 PM
آخر رد: zinom

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


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