منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : محتاج مساعدة ضرورى لبرنامج تحويل الحروف الاجنبيه الى عربيه
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم و رحمه الله و بركاته
Big Grin يا أخوانى انا كل الى عايزة من برمجه الفيجوال بيسك برنامج واحد فقط يحول حروف اى لغه الى حروف لغه اخرى - بمعنى فى اللغه الانجليزيه حرف j  ينطق ج - انا عايز اعمل خانتين او صفين من الخانات الفاضيه خانات 1 لحروف اللغه الاولى و خانات 2 لحروف اللغه الثانيه بحيث لما اكتب كلمه بالانجليزى مثلا  car تتكتب فى الخانه التانيه بالعربى كار
يعنى مثال
c=ك
a=أ
R=ر

يعنى كلمه car  هتتكتب بالعربى كار 
دورت على الانترنت لاقيت اكواد كتير بس مش عارف اطبقها على فيجوال بيسك ممكن تساعدونى
الاكواد اهيه
http://stackoverflow.com/questions/23133...c-to-latin
و دى بلغه php
http://stackoverflow.com/questions/74614...ion-in-php

حاولت اعمل كوبايل بالموقع دة منصه انلاين بس مش عايز يدينى نتيجة و انا جديد فى البرمجه
http://www.tutorialspoint.com/

انا عايز برنامج يطلع زى الشكل دة كدة
http://www.lexilogos.com/keyboard/serbia...ersion.htm

ممكن تساعدونى ؟
Car = كار
Cell= سِل
Ocean = أوشِن
مقارنة الحروف اللاتينية ببعضها مع اختلاف اللغة مش مشكلة المشكلة شوية بالنطق والكتابة بالعربية
Osama = اسامة eng
Osama = أزامة Por
XP = إكس بي
XP= شيس بي
لاحظ مثلا في الفتكشن المعروض في اول رابط انت وضعته
PHP كود :
Imports System.Text

Module Module1

    
Function ReverseAlphabet(As String) As String
        Dim inputTable
() As Char "ABCDEFGHIJKLMNOPQRSTUVWXYZ".ToCharArray()
        
Dim outputTable() As Char "ZYXWVUTSRQPONMLKJIHGFEDCBA".ToCharArray()
        
Dim sb As New StringBuilder

        
For Each c As Char In s
            Dim inputIndex 
= Array.IndexOf(inputTablec)
            If 
inputIndex >= 0 Then
                
' we found it - look up the value to convert it to.
                Dim outputChar = outputTable(inputIndex)
                sb.Append(outputChar)
            Else
                ' 
we don't know what to do with it, so leave it as is.
                sb.Append(c)
            End If
        Next

        Return sb.ToString()

    End Function

    Sub Main()
        Console.WriteLine(ReverseAlphabet("ABC4")) ' 
outputs "ZYX4"
        
Console.ReadLine()
    
End Sub

End Module 
لا شي غير انه غير ترتيب المتاقبلات من الحروف
لكن بالنسبة للعربي انظر كم احتمال للحرف الواحد مثلا
D
DH
K
KH
C
Ce
Ci
Cy
G
GH
والسايلنت مثلا
Night = Nite
يمكن بشوية جهد وترتيب افكار تجيب اللي في راسك وأكثر
كل الاكواد المطروحة في الروابط مصفوفات يعني مصفوفتين لها نفس الطول وكل ما عليك هو اخذ المقابل لكل Item فقط من المصفوفة الثانية
بس مشكلة النطق بالعربي تفرق
لو هتكتب
Car = سار
Night = نايجهت
في خمس دقايق يكون المثال جاهز !! وطبعا اللي انت عايزه مش كده إ
إن شاء الله تكون فهمت من رغيي عليك حاجة
بالتوفيق
تفضل مشروع سويتو الان عدل في الحروف على كيفك (حمل من المرفقات ) . صورة من المشروع.


[صورة مرفقة: 1445523442611.png]
بارك الله فيك اخي الكريم "gator"
ممكن توفر  التحقق من الكابتال والسمول بان توحد الحالة باستخدام  
PHP كود :
             If RichTextBox3.Text"c" Or RichTextBox3.Text "C" Then
            RichTextBox2
.Text += "س"
        End If



___________________
        
If RichTextBox3.Text.ToLower "c"  Then
            RichTextBox2
.Text += "س"
        End If 
شكرا لك

لكن المشكلة التي ذكرها ابو عمر لا زالت قائمة جرب ان تكتب car

يعطيك العافية
لها قاعدة على مااذكر متى ننطق الـ c "ك" ومتى ننطقها "س"  بناء على ماهو الحرف الذي بعدها .. لكن نسيتSad
http://kosad.yoo7.com/t5873-topic
مشكورين شباب بالنسبة ل كلمة car هوي ممكن يعدل الحروف داخل السورس حسب الترجمة التي يريدها حتى ممكن يضيف sh لتترجم حرف ش .
اخى gator انا عاجز عن الشكر - جزاك الله كل خير الف الف الف الف مليون شكر - ربنا يكرمك يا رب - شكرااااااااااااااااااااا
ولكن عندي فضول ما فائدة هذا البرنامج واين يستخدم ؟ Huh

يعطيك العافية  Smile
هذا البرنامج الاستفادة منه أخوى abulayth أنك تستطيع كتابه كلمات اى لغه بحروف لغتك الأم فيكون سهل عليك حفظها
مثال كلمه play فى اللغه الأنجليزيه تتكتب و تحفظها باللغه العربيه = بلاى
و كمان هذا البرنامج ممكن تكتب تحولوا الى برنامج فرانكو عربى يعنى حرف ح فى اللغه العربيه بيتكتب فى لغه الفرانكو عربى 7 فانت تقدر تكتب رساله بالعربى و تحولها لفرانكو عربى بسهوله
و كمان اخى الكريم فى ناس بتنسى تحول من الكيبورد من عربى لانجليزى فبتكتب بالعربى مثلا كلمه مرحبا بتتكب lvpfh فالبرنامج يحول كل الكلام الى العربى لو انته نسيت
هوة ممكن يكون ليه استخدامات كتير
ولازم لازم لازم أشكر الأخ gator للمرة المليون على انو سهل عليا جدا البحث فى الانترنت و بعت المشروع بالكامل - ربنا يجازيه خير أن شاء الله
الصفحات : 1 2