الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

احد يعبرنا ياناس

مغلق
بدأه m13 في 6 مارس 2002 · 11 رد · 810 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

ياشباب واجهتنى مشكلة اثناء كتابة الكلام بالحقل بالفورم فمثلا انا مسوى حقل ومسميه ملاحظات واذا كتبت الملاحظات المطلوبة مايقبل اكثر من عشر كلمات كيف نجعل الحقل مفتوح للكتابة ....

تحياتى....

#2

غير خصائص الحقل من نص إلى مذكرة .

أشرف خليل

#3

100% يااشرف (y)

وياريت تشوفلنا حل مع اللغة العربية وطلبى باختصار تثبيت اللغة العربية وجعلها اللغة الافتراضية ببرنامج الاكسس يعنى مااحتاج اغير اللغة الى العربى من شريط المهام بالاسفل ...

بالتوفيق.......راجع هنا

#4

- تغيير اللغة لايلزم أن يكون عن طريق شريط المهام يكفي الضغط على مفتاحي Shift + Alt معاً .

- ثم أنك تستطيع عن طريق التغيير في خصائص الحقل-تنسيق - اللغة أن تجعل لغة الحقل هي اللغة العربية .

أرجو أن يكون ماكتبته هو ماتطلبه .

وبالتوفيق للجميع .

#5

هلا الغريب هذا اللى انا اسويه وهو تغيير اللغة عن طريق Shift + Alt

لكن انا حاليا مثبت لغة الجهاز بالكامل على اللغة العربية وجعلتها هى الاساسية لكن عند فتح الاكسس تقلب اللغة الى انقليزى فاضطر الى ارجاعها للعربى ...علما ام امايكروسوفت وورد وكذلك الاكسل مافيهم مشاكل اللغة العربية هى الاساسية لكن الاكسس اول ماافتح الجدول تقلب اللغة الى انقليزى ....

انت قلت غير اللغة عن طريق خصائص الحقل فهل لك ان تشرح الطريقة

وياريت تكتب الاوامر بالانقليزى لان الاكسس عندى انقليزى...

تحياتى ...

#6

هذا كود سبق ان وضعه الاخ حمود70 فى قسم البيزيك و يليه طريقة اسهل للأخ weego فى نفس القسم

Private Declare Function GetKeyboardLayout Lib "user32" (ByVal dwLayout As Long) As Long 

Dim kbd As Long 

On Error Resume Next 
'get keyboard language.Arabic or English 

kbd = GetKeyboardLayout(0) 
kbd = Hex(kbd) 

If Right(kbd, 1) = 1 Then 
'keyboard is arabic 
msgbox "عربي" 
Else 
'keyboard is english 
msgbox "انجليزي" 
End If

Text1.SetFocus 
"^%" SendKeys
#7

هلا الغريب وهلا مصراوى واشكركما على المساعدة.......

بالنسبة للغة استطعت تثبيت اللغة العربية ..لكن بقيت عندى مشكلة وحيدة وهى عندما استخدم خاصية find and replace مازال المؤشر على اليمين يعنى انقليزى فاضطر الى ضغط shift+ alt لتغيير اللغة الى العربى....فكيف استطيع تثبيت خاصية find and replace على اللغة العربية....

الاخ مصراوى ياريت توضح وين نضع الكود بالضبط علما ان الاكسس اللى عندى 2000 انقليزى....معليش ترانى جديد بالاكسس :D

تحياتى.......

#8

بالنسبة للكود الاو ل

تضع أول سطر للتعريف بمفرده

ثم باقي الاسطر فى حدث فتح الفورم

أما بالنسبة للثاني فعند الوقوف علي المكان الذي تريد الكتابة فيه بالعربي (صندوق نص اسمه Text1 مثلا )

جرب و ان لم ينجحا اخبرني فانا لم اجربهما بعد

#9

هلا مصراوى فى الحقيقة ماضبط الكود او يمكن ماعرفتله تمام..

عموما انا كل شى تمام عندى من ناحية اللغة ماعدا خاصية البحث FIND عندما افتحها يقلب المؤشر الىاللغة الانقليزية وانا ابغاه يثبت على اللغة العربية على طول دون الحاجة الى استخدام shift+alt ...

تحياتى لك......

#10

وينكم ياشباب......

#11

معقولة مافى احد عنده جواب .....

احد يقولى ليه خاصية البحث فى المايكروسوفت وورد ثابتة على العربى وكذلك فى الاكسل ايش معنى الاكسس تقلب انقليزى واظطر الى ارجاعها الى العربى ...

يمكن سؤالى صعب طيب ابعطيكم سؤال سهل ...كيف نسوى بحث

بغير طريقة الكوماند من التول بوكس ....يعنى عندما ابحث عن سجل

معين مثلا ابستخدم طريقة بحث بالاسم مثلا ...يعنى ببساطة نفس طريقة find اللى على شكل نظارة :D ولكن بشكل آخر او بطريقة اخرى سواء عن طريقة الاستعلام او اى طريقة اخرى...ملاحظة الاكسس عندى عربى......

تحياتى......

#12

راجع هذا الرابط

http://www.arabteam2000.com/vb/showthread....p?threadid=9640

ففيه ما تريد ان شاء الله

هذا الموضوع مغلق.

مواضيع مشابهة