+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 (/showthread.php?tid=11383)
تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 - أبو معاذ - 03-06-2021
السلام عليكم.
ثبت عندي دلفي 7 Lite لكنه ذو واجهة بالإنجليزية.
حاولت تغيير رسائل التأكيد الخاصة ب DbNavigator من اللغة الإنجليزي إلى اللغة الفرنسية (
) لكنني لم أفلح.lمثل :
كود :
delete rcord? إلى Supprimer l'enregistrement?حاولت عملية نسخ لصق للملف VDBConsts.pas الذي يحوي هذه الرسائل من نسخة فرتسية لدلفي 7.
لكن دون جدوى.
هل من توجيه من فضلكم.
RE: تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 - larbiparadox - 03-06-2021
وعليك السلام
أرفق الملف VDBConsts.pas إلى مشروعك بعد تعديل عليه
![[صورة: 787228789.png]](https://www4.0zz0.com/2021/06/03/15/787228789.png)
![[صورة: 178547869.png]](https://www4.0zz0.com/2021/06/03/15/178547869.png)
بعدها ينتج عنه ملف VDBConsts.dcu الموجود في مشروعك ، إذا أردت اللغة التي تريدها دائمة أنسخه إلى
كود :
C:\Program Files\Borland\Delphi7\Lib
C:\Program Files\Borland\Delphi7\Lib\DebugRE: تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 - أبو معاذ - 03-06-2021
زادك الله من واسع فضله.
RE: تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 - mobile - 03-06-2021
السلام عليكم
من الخطا الاعتماد على رسائل المكونات و اي شيئ افتراضي
يجب ان تتحكم في برنامجك و في كل جزء فيه
مثال على الحذف
كود :
procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn);
begin
if Button = nbDelete then
begin
if MessageDlg('Confirm delete now?', mtConfirmation, [mbYes,mbNo], 0) = mrNo then
begin
Abort;
end;
end;
end;RE: تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 - أبو معاذ - 03-06-2021
(03-06-2021, 08:51 PM)mobile كتب : السلام عليكم
من الخطا الاعتماد على رسائل المكونات و اي شيئ افتراضي
يجب ان تتحكم في برنامجك و في كل جزء فيه
مثال على الحذف
كود :procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if Button = nbDelete then begin if MessageDlg('Confirm delete now?', mtConfirmation, [mbYes,mbNo], 0) = mrNo then begin Abort; end; end; end;
وعليكم السلام ورحمة الله و بركاته.
معاك الحق ، لكن ليس هذا مقصود سؤالي.
سؤالي عن تغيير لغة الرسالة فقط.
أما الاعتماد على العملية مباشرة طبعا لا.
RE: تغيير لغة رسائل التأكيد الخاصة ب DbNavigator في دلفي 7 - mobile - 06-06-2021
(03-06-2021, 09:13 PM)أبو معاذ كتب : وعليكم السلام ورحمة الله و بركاته.
معاك الحق ، لكن ليس هذا مقصود سؤالي.
سؤالي عن تغيير لغة الرسالة فقط.
أما الاعتماد على العملية مباشرة طبعا لا.
وانا ايضا هذا ما كان جوابي ! تغيير الرسالة لاي لغة !
