المسيلة M'sila 28 لكل الجزائريين و العرب
 
الرئيسيةالتسجيلالأعضاءس .و .جمكتبة الصوردخول

شاطر | 
 

 كيف تعرب الصناديق (Dialogs) الأساسية في دلفي

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
ouali
مدير منتدى المسيلة
مدير منتدى المسيلة
avatar

الجزائر : الجـزائـــــــــر
ذكر عدد الرسائل : 2373
تاريخ الميلاد تاريخ الميلاد : 24/12/1982
العمر : 34
الموقع : http://msila.sd.ma
المزاج : الحمد لله
الدولة : الجزائر
نقاط : 40614
تقييم الاعضاء لك : 56
تاريخ التسجيل : 30/08/2007

مُساهمةموضوع: كيف تعرب الصناديق (Dialogs) الأساسية في دلفي   الجمعة يونيو 13, 2008 11:56 am

نأخذ مثلاً على ذلك OpenDialog كل ما عليك هو كتابة شيفرة الحدث OnShow للصندوق وتقوم باستعمال التابع SetDlgItemText من أجل اسناد قيم جديدة للأزرار لنأخذ مثال عملي في دلفي عبارة عن نموذج (Form) و (1OpenDialog) ونغير الحدث OnShow ليصبح procedure TForm1.OpenDialog1Show(Sender: TObject);
begin
{"OPEN" - > "فتح"}
SetDlgItemText (GetParent (OpenDialog1.Handle), IDOK, PChar ('&فتح')) ;
{"Cancel" - > "&إلغاء الأمر"}
SetDlgItemText (GetParent (OpenDialog1.Handle),IDCANCEL, PChar ('&إلغاء الأمر'))

End;




الكود:
الكود:
procedure TForm1.OpenDialog1Show(Sender: TObject);
[font='Times New Roman']begin
  {"OPEN" - > "فتح"}
SetDlgItemText (GetParent (OpenDialog1.Handle), IDOK, PChar ('&فتح')) ;
[font='Times New Roman']{"Cancel" - > "&إلغاء الأمر"}
[font='Times New Roman']SetDlgItemText (GetParent (OpenDialog1.Handle),IDCANCEL, PChar ('&إلغاء الأمر'))

End;
[/font][/font][/font]





الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://msila.4umer.net
smain

avatar

ذكر عدد الرسائل : 2
تاريخ الميلاد تاريخ الميلاد : 14/05/1958
العمر : 59
نقاط : 6422
تقييم الاعضاء لك : 10
تاريخ التسجيل : 24/09/2015

مُساهمةموضوع: رد: كيف تعرب الصناديق (Dialogs) الأساسية في دلفي   السبت سبتمبر 26, 2015 11:07 pm

مهلا سيدي لماذا هذا العناء كله هناك مكون بالعربية Arabadialog وبلغة دلفي يسهل المهمة دون عنــاء شكرا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
 
كيف تعرب الصناديق (Dialogs) الأساسية في دلفي
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
المسيلة 28 لكل الجزائريين و العرب m'sila 28 :: ¤®§(§ منتدى البرامج والبرمجة §)§®¤ :: قسم البرمجة :: لغة دلفى delphi-
انتقل الى: