المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : تحويل الغة من الفرنسية الى العربية عن طريق برمجة بالدالفي


احمد عين التوتة
2009-07-08, 18:02
السلام عليكم
اخواني اطلب منكم المساعدة انا بصدد انجاز برنامج بالدالفي و فيه edit يجب ان يعمل بالفرنسية اما الاخر فمن الضروري ان يعمل بالعربية المطلوب ان يكون البرنامج ذكي و يغير اللغة تلقائيا عند الدخول الى edit الثاني
حاولت بتطبق التالي
syslocale.MidleEast:= true
edit1.Bidimode:=bdRighttoleft
LoadKeyboardLayout('0000040c', KLF_ACTIVATE
Application.BiDiKeyboard := '0000040c'
لكن الفكرة غير ناجحة لذلك اطلب منكم المساعدة و شكرا

المثابر120
2009-07-08, 19:57
اتمني لو استطيع المساعدة لكن لسوء الحظ لاعلم لي بهذه الامور ارجو من الذي يملك خبرة في هدا المجال ان لايبخل بالمساعدة واجره عند لله

حسن سلامة
2009-07-17, 20:46
السلام عليكم
اخى لم فهم جيداالمطلوب بالضبط .حاول الاستفادة من الخاصية onchange للعنصر edit المطلوب . ارجو التوضيح اكثر لكي استطيع فهمالمطلوب

BONOI
2009-07-18, 18:57
السلام عليكم ورحمة الله
اخي تقوم بتحديد edit وتذهب الى evenements من inspecteur d'objets ثم نقرتين على OnEnter وتكتب
LoadKeyboardLayout('00000401', KLF_ACTIVATE);
Application.BiDiKeyboard := '00000401';
هذا بالنسبة للعربية ولارجاع اللغة انجليزية تقوم بنفس الطريقة مع تغيير الكود الى
LoadKeyboardLayout('0000040c', KLF_ACTIVATE);
Application.BiDiKeyboard := '0000040c';
ملاحظة: يجب ان يكون نوع الخط من font الخاص بـ edit يقبل اللغة العربية والا ستظهر رموز
والسلام عليكم

FOUADALGER
2010-05-25, 21:37
السلام عليكم ورحمة الله وبركاته
اشكرك اخي bonoi على الحل الرائع
ايام كثيرة وانا ابحث عن جواب لهذا السؤال
بارك الله فيك وجعلها في ميزان حسناتك-امين-