+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] تحويل الاسماء العربية الى انجليزية (/showthread.php?tid=13862)
تحويل الاسماء العربية الى انجليزية - البراء - 18-11-15
بسم الله الرحمن الرحيم
السلام عليكم
الاخوة الاحباء بحث عن كود لتحويل الاسماء من اللغة العربية الى الانجليزية فتوصلت الى كود يحول ولكن ليس دقيق 100%100 لذلك ساوضع الكود لكي يتم التعديل عليه من الاخوة في المنتدى لنصل الى طريقة صحيحة حتى الجميع يستفيد منها تحياتي للجميع
PHP كود :
Function TransA2E(W As String) As String
Try
Dim p As Integer
Dim AL(), EL()
AL = (New String() {" ال", "َا", "ا", "أ", "آ", "ى", "إ", "ؤ", "ئ", "ب", "ت", "ث", "ج", "ح", "خ", "د", "ذ", "ر", "ز", "س", "ش", "ص", "ض", "ط", "ظ", "ع", "غ", "ف", "ق", "ك", "ل", "م", "ن", "ه", "ة", "ُوْ", "و", "ِيْ", "ي", "َ", "ً", "ُ", "ٌ", "ِ", "ٍ", "ء"})
EL = (New String() {" al-", "a", "a", "a", "a", "a", "i", "u", "i", "b", "t", "th", "j", "ha", "kh", "d", "th", "r", "z", "s", "sh", "s", "sh", "t", "th", "a", "g", "f", "q", "k", "l", "m", "n", "h", "h", "u", "ou", "i", "y", "a", "tn", "u", "un", "i", "in", "'a"})
Do
p = InStr(p + 1, W, "ّ")
If p > 0 Then W = Left(W, p - 1) & Mid(W, p - 1, 1) & Mid(W, p + 1)
Loop While p > 0
For R = LBound(AL) To UBound(AL)
W = Replace(W, AL(R), EL(R))
Next
TransA2E = W
Catch ex As Exception
End Try
End Function
RE: تحويل الاسماء العربية الى انجليزية - myalsailamy - 19-11-15
السلام عليكم ،،،
لا اعلم عن مدى صحة الطريقة التي تقدمها و لكن اجعلها اخر حل من وجهة نظري لانها لا تعطي نتائج صحيحه بالنسبه لي فانا اعتمدت طريقه اخرى وهي اني جمعت اغلب الاسماء و الاكثر شيوعا بالمنطقه التي اعيش فيها و كان مشروعي لانشاء برنامج ارشيف لوحدة صحيه و من المشاكل التي واجهتها هي تحويل الحروف العربيه الى الانجليزيه بالمناسبه يطلق على هذه العمليه (رومنة الأسماء) اذا اردت البحث عنها بقوقل و ستجد مقالات و خوارزميات كثيره تتحدث بهذا الشأن على العموم كانت طريقتي اني دخلت احد اشهر مواقع الاسماء العربيه (بالمناسبه كان موقع لاختيار اسم مولودك الجديد هههههه ) و التي مكتوبه بالعربيه و ما يقابل الاسم بالانجليزي و كونت لي قاعدة بيانات (قاموس) تحوي الاسم بالعربي و الاسم بالانجليزي و حقل اضافي - وهوالاسم العربي مجرد من التشكيل و موحد الحروف- فمثلا قد تجد من يكتب اسم فاطمه بحرف الهاء و من منهم يكتبها بتاء مربوطه فاطمة فهنا الاسم المجرد ان تكتب فاطمه حيث ان المستخدم عندما يدخل اسم فاطمة بتاء مربوطه استبدله بالهاء و ابحث بكلتا الكلمتين فاطمه او فاطمة ، ايضا ضع بالاعتبار الهمزه أحدهم سيكتب أحمد و الاخر احمد و هكذا ،، نأتي للـ Function التي قمت بكتابتها و فائدتها عندما لا يجد البرنامج اي مقابل للاسم فانه يضطر لرومنة الاسم بالطريقة التي استخدمتها انت ، و لكن مع الاتاحه للمستخدم بان يقوم بتحرير الاسم ثانيا اجعل برنامجك ذو ذكاء و مرونه اي انه في حالة تعديل الاسم المرومن من قبل مستخدم النظام العادي فان البرنامج يضيف الاسم الجديد و ما يقابله في قاعدة بياناتك مع عدم اعتماده و من فتره لفتره تدخل على النظام و تقوم بتحقق من صحة الادخال و اعتماد استخدامها بعد ذلك في النظام ، علما ان بعض الاخوه استخدم مترجم قوقل في الرومنة و لكن الشيء المضحك بالرغم من فائدته الا انه ليس دقيقا حيث انك لو ادخلت اسم محمد سيعيدها Mohammed و لكن قم بكتابة سعيد فسيعيدها لك Happy ^_^ ،،،
هذا و الله المستعان // بالتوفيق
RE: تحويل الاسماء العربية الى انجليزية - البراء - 19-11-15
بصراحة رد رائع من الاخ الغالي myalsailamy ولكن نحن المبرمجين نحتاج الى ان نتعاون مع بعضنا لكي الجميع يستفيد ممكن ان نحل هذه المشكلة التي تواجهنا بتجميع الاسماء وجميع الافكار والطروحات المفيدة في قاعدة بيانات (رومنة الأسماء) حتى نصل الى قاعدة شبهه كاملة بقدر المستطاع وفي النهاية نجمع ما سبق ونضيفه في قسم المشاريع كمشروع للجميع واجرنا عند الله عظيم
RE: تحويل الاسماء العربية الى انجليزية - HASAN6.0 - 19-11-15
يبدو ان الموضوع اعقد من ذلك , وله اساسيات وقواعد مختلفة
إقتباس :الأسماء لا تترجم ولكن يمكن كتابتها بلغة أخرى باستخدام مجموعة الحروف التي تضاهي في صوتها أقرب نطق للاسم أي إعادة بناء الاسم باستخدام النظام الصوتي للغة الثانية وهذه العملية تسمى بالنقل الحرفي (Transliteration) ويجب أن تكون الحروف المستخدمة كلها من حروف اللغة المنقول إليها الاسم (اللغة المستهدفة).
هذا النظام ينقل الأسماء العربية إلى اللغة الإنجليزية أي أن المخرجات تناسب مجموعة الدول الناطقة باللغة الإنجليزية لأن هنالك دول أخرى تستخدم الحروف اللاتينية كلها ولكن الإنجليزية ليست لغتها مثل معظم دول أوروبا، ولمعرفة أهمية ذلك نستدل بالاسم "أحمد" فهو ينقل إلى اللغة الإنجليزية هكذا (Ahmad) وليس (Ahmed) فالطريقة الثانية تناسب الدول التي تنتمي للثقافة الفرانكفونية
المصدر
لاحظ الملف المرفق
RE: تحويل الاسماء العربية الى انجليزية - myalsailamy - 20-11-15
جرب هذه الخدمه قد تعطيك نتائج ربما افضل من استخدام مترجم قوقل ،،،
حتى لو بحث عن الموقع في قوقل لن تجده لاني بحث عنه طويلا حتى اشاركك اياه ولكن بدون جدوى و من حسن حظك اني وجدت أني لازلت أحتفظ برابطه بملف نصي بين ملفاتي القديمه :
http://www.intellaren.com/intellibe
و ايضا هذا رابط الموقع يحوي قاموس لا بأس به من الاسماء العربيه و ما يقابلها بالانجليزي
http://alasmaa.hawaalive.com/
http://muslim-names.us/%D8%A7%D8%B3%D9%85%D8%A7%D8%A1_%D8%AA%D8%A8%D8%AF%D8%A3_%D8%A8%D8%A7%D9%84%D8%AD%D8%B1%D9%81_%D8%A7%D9%84%D9%81/
http://supermama.me/%D8%A3%D8%B3%D9%85%D8%A7%D8%A1-%D8%A3%D9%88%D9%84%D8%A7%D8%AF-%D9%88%D8%A8%D9%86%D8%A7%D8%AA-%D8%AC%D8%AF%D9%8A%D8%AF%D8%A9-%D9%88%D9%85%D8%B9%D8%A7%D9%86%D9%8A%D9%87%D8%A7-%D9%85%D8%AD%D8%B1%D9%83-%D8%A8%D8%AD%D8%AB-%D8%A3%D8%B3%D9%85%D8%A7%D8%A1-%D8%A7%D9%84%D9%85%D9%88%D8%A7%D9%84%D9%8A%D8%AF-%D9%85%D9%86-%D8%B3%D9%88%D8%A8%D8%B1%D9%85%D8%A7%D9%85%D8%A7?&&title=All&page=7
و هناك موقع افضل و لكن عندما قمت بتجربته لم يعمل ربما ان صاحبه قام بالغائه
بالتوفيق