الانتقال إلى المحتوى
View in the app

A better way to browse. Learn more.
مجموعة مستخدمي أوراكل العربية

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

انشاء برنامج لترجمة الاسماء من عربى الى انجليزى

  •
sherif163
بواسطة sherif163
في منتدى النماذج الــ Forms

Featured Replies

بتاريخ:

السلام عليكم
كيف يتم انشاء trigger فى الform يقوم بعمل ترجمة اسماء موجودة فى حقل وارسالها الى حقل اخر مترجمة الى الانجليزية

  • اقتباس
    • بتاريخ:

    بس يا سيدى
    فى فكره انا كنت عملتها مش عارف تعجبك ولا لالألألألألألألألألألألألألألألألألألألألأ

    declare
 nem varchar2(100);
 x varchar2(100);
 d varchar2(100);
 TB_NAME VARCHAR2(30);
 TABLE_id NUMBER;
 AR_NAME VARCHAR2(30) :=:TABLES_NAME;
 alertnuser number;
begin
 if :TABLES_NAME is not null then
   FOR I IN 1..LENGTH(:TABLES_NAME) LOOP
     nem:=SUBSTR(:TABLES_NAME,I,1);
       for j in 1..i loop
         if nem ='¿'then
           nem:=Replace(nem,'¿','a');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','b');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','c');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','D');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','E');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','f');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','g');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','j');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','i');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','l');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','m');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','n');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','k');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','h');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','g');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','s');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','q');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','w');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','r');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','t');
         end if;
         if nem ='¿¿'then
           nem:=Replace(nem,'¿¿','y');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','u');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','o');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','p');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','z');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','x');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','v');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','as');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ad');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','af');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ag');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ah');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ak');
         end if;
         if nem ='¿¿'then
           nem:=Replace(nem,'¿','al');
         end if;
         if nem ='¿¿'then
           nem:=Replace(nem,'¿','am');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ab');
         end if;
         x:=nem;
       end loop;
        d:=d||x;
   END LOOP;
   TB_NAME:=d;
 forms_ddl('create table '||TB_NAME ||'(t_code number(10) primary key,t_date date,per_id number)');
 	select nvl(max(TB_NUMBER),0) into TABLE_id from CONF_TABLE;
 INSERT INTO CONF_TABLE VALUES (TABLE_id+1,TB_NAME,:TABLES_NAME);
 set_alert_property('DROP_CREATE',alert_message_text,'¿¿ ¿¿¿¿¿ ¿¿¿¿¿¿ : '||AR_NAME );
 alertnuser := show_alert('DROP_CREATE');
 :TABLES_NAME:='';
 ELSE
 	set_alert_property('DROP_CREATE',alert_message_text,'¿¿¿ ¿¿¿¿¿ ¿¿¿ ¿¿¿¿¿¿¿¿ ¿¿¿¿ ¿¿¿¿ ¿¿¿¿¿¿');
 alertnuser := show_alert('DROP_CREATE');
 end if;
end;



    بس الحكايه انك بتعمل فحص على كل حرف و بتغيره بحرف تانى .

    اتمنى يكون ده اللى مطلوب
    اكيد محتاجه تعديل

    ايهاب وجدى

  • اقتباس
    • بتاريخ:
    • كاتب الموضوع
    بس يا سيدى
    فى فكره انا كنت عملتها مش عارف تعجبك ولا لالألألألألألألألألألألألألألألألألألألألأ
    declare
 nem varchar2(100);
 x varchar2(100);
 d varchar2(100);
 TB_NAME VARCHAR2(30);
 TABLE_id NUMBER;
 AR_NAME VARCHAR2(30) :=:TABLES_NAME;
 alertnuser number;
begin
 if :TABLES_NAME is not null then
   FOR I IN 1..LENGTH(:TABLES_NAME) LOOP
     nem:=SUBSTR(:TABLES_NAME,I,1);
       for j in 1..i loop
         if nem ='¿'then
           nem:=Replace(nem,'¿','a');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','b');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','c');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','D');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','E');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','f');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','g');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','j');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','i');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','l');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','m');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','n');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','k');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','h');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','g');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','s');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','q');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','w');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','r');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','t');
         end if;
         if nem ='¿¿'then
           nem:=Replace(nem,'¿¿','y');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','u');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','o');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','p');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','z');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','x');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','v');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','as');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ad');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','af');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ag');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ah');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ak');
         end if;
         if nem ='¿¿'then
           nem:=Replace(nem,'¿','al');
         end if;
         if nem ='¿¿'then
           nem:=Replace(nem,'¿','am');
         end if;
         if nem ='¿'then
           nem:=Replace(nem,'¿','ab');
         end if;
         x:=nem;
       end loop;
        d:=d||x;
   END LOOP;
   TB_NAME:=d;
 forms_ddl('create table '||TB_NAME ||'(t_code number(10) primary key,t_date date,per_id number)');
 	select nvl(max(TB_NUMBER),0) into TABLE_id from CONF_TABLE;
 INSERT INTO CONF_TABLE VALUES (TABLE_id+1,TB_NAME,:TABLES_NAME);
 set_alert_property('DROP_CREATE',alert_message_text,'¿¿ ¿¿¿¿¿ ¿¿¿¿¿¿ : '||AR_NAME );
 alertnuser := show_alert('DROP_CREATE');
 :TABLES_NAME:='';
 ELSE
 	set_alert_property('DROP_CREATE',alert_message_text,'¿¿¿ ¿¿¿¿¿ ¿¿¿ ¿¿¿¿¿¿¿¿ ¿¿¿¿ ¿¿¿¿ ¿¿¿¿¿¿');
 alertnuser := show_alert('DROP_CREATE');
 end if;
end;

       

    بس الحكايه انك بتعمل فحص على كل حرف و بتغيره بحرف تانى .

    اتمنى يكون ده اللى مطلوب
    اكيد محتاجه تعديل

    ايهاب وجدى

    74386[/snapback]


  • اقتباس
    • بتاريخ:
    • كاتب الموضوع

    شكرا جزيلا وسوف اقوم بتجربتة
    جزاك الله كل خير

  • اقتباس
    • بعد 11 سنة...
    بتاريخ:

    السلام عليكم شباب ممكن برنامج يترجم الاسماء العربية الى انكليزية وشكرا!!\

  • اقتباس

    • انضم إلى المناقشة

    يمكنك المشاركة الآن والتسجيل لاحقاً. إذا كان لديك حساب, سجل دخولك الآن لتقوم بالمشاركة من خلال حسابك.

    زائر
    أضف رد على هذا الموضوع...
    عودة لقائمة الموضوعات

    برجاء الإنتباه

    بإستخدامك للموقع فأنت تتعهد بالموافقة على هذه البنود: سياسة الخصوصية

    أوافق

    Account

    Navigation

    البحث

    إعداد إشعارات المتصفح الفورية
    Chrome (Android)
    1. Tap the lock icon next to the address bar.
    2. Tap Permissions → Notifications.
    3. Adjust your preference.
    Chrome (Desktop)
    1. Click the padlock icon in the address bar.
    2. Select Site settings.
    3. Find Notifications and adjust your preference.