إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

مساعده في كتابه كود علي زر

تقليص
هذا الموضوع مغلق.
X
X
 
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة

  • مساعده في كتابه كود علي زر

    بسم الله الرحمن الرحيم


    هذا هو كود لتحديد والغاء تحديد ال sheck box
    كود:
    bChecked = CheckBox.GetChecked(this);
    if bChecked==true then
      CheckBox.SetText(this, "إلغاء تحديد الكل");
      for i=1, 12 do
        CheckBox.SetChecked("CheckBox"..i, true);
      end
      else 
        CheckBox.SetText(this, "تحديد الكل");
        for i=1, 12 do
          CheckBox.SetChecked("CheckBox"..i, false);
        end  
    end
    اريد نفس الكود ولاكن علي زر

  • #2
    إستبدل كلمة this
    بالإسم الحقيقى للشيك بوكس
    ضع الإسكربت فى الحدث onclick للزر

    تعليق


    • #3
      المشاركة الأصلية بواسطة النصل القاطع مشاهدة المشاركة
      إستبدل كلمة this
      بالإسم الحقيقى للشيك بوكس
      ضع الإسكربت فى الحدث onclick للزر
      ارجو منك كتابه الكود لاني اريد من الزر تحديد مجموعه وليس واحد فقط من السيك بوكس

      تعليق


      • #4
        هل يمكن وضع ملف مفتوح لإجراء التعديلات المناسبة لة ؟

        تعليق


        • #5
          هذا كود موجود عندى ولا اعلم هل هذا ما قصدته أم لا

          تثبيت المحدد

          Button.SetText("time", "00 : 00");
          i=0;
          j=0;

          confirmation1 = Dialog.Message("Basim Magdy", "هل أنت متأكد من تثبيت كل البرامج ؟", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
          if confirmation1 == 6 then

          x01 = CheckBox.GetChecked("Box01");
          x02 = CheckBox.GetChecked("Box02");
          x03 = CheckBox.GetChecked("Box03");
          x04 = CheckBox.GetChecked("Box04");
          x05 = CheckBox.GetChecked("Box05");

          تثبيت الكل


          i=0;
          j=0;


          confirmation1 = Dialog.Message("Basim Magdy", "هل أنت متأكد من تثبيت كل البرامج ؟", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
          if confirmation1 == 6 then
          Dialog.TimedMessage("Please Wait...", "فضلا إنتظر قليلا .. جاري البدء في التثبيت", 3000, MB_ICONNONE);
          Progress.SetVisible("Progress1", true);
          Button.SetVisible("status", true);
          Button.SetEnabled("Button1", true);



          CheckBox.SetChecked("Box01", true);
          CheckBox.SetChecked("Box02", true);
          CheckBox.SetChecked("Box03", true);
          CheckBox.SetChecked("Box04", true);
          CheckBox.SetChecked("Box05", true);
          CheckBox.SetChecked("Box06", true);
          CheckBox.SetChecked("Box07", true);
          CheckBox.SetChecked("Box08", true);
          CheckBox.SetChecked("Box09", true);
          CheckBox.SetChecked("Box010", true);
          CheckBox.SetChecked("Box011", true);
          CheckBox.SetChecked("Box012", true);
          CheckBox.SetChecked("Box013", true);
          CheckBox.SetChecked("Box014", true);
          CheckBox.SetChecked("Box015", true);
          CheckBox.SetChecked("Box016", true);
          CheckBox.SetChecked("Box017", true);
          CheckBox.SetChecked("Box018", true);
          CheckBox.SetChecked("Box019", true);
          CheckBox.SetChecked("Box020", true);
          CheckBox.SetChecked("Box021", true);
          CheckBox.SetChecked("Box022", true);
          CheckBox.SetChecked("Box023", true);
          CheckBox.SetChecked("Box024", false);

          ---------------------------------------

          Label.SetText("c1", "1");

          Button.SetText("status", "Adobe Reader 10");
          result = File.Run("AutoPlay\\Docs\\Adobe Reader 10 Ar.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "K-Lite Codec");
          result = File.Run("AutoPlay\\Docs\\K-Lite Codec Pack960.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "office 2003");
          result = File.Run("AutoPlay\\Docs\\office 2003.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "C Cleaner");
          result = File.Run("AutoPlay\\Docs\\CCleaner.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Media Player 11");
          result = File.Run("AutoPlay\\Docs\\media11.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Win amp");
          result = File.Run("AutoPlay\\Docs\\winamp563_full.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Wafi Translator");
          result = File.Run("AutoPlay\\Docs\\Golden Al-Wafi Translator.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Net Frame Work 3.5");
          result = File.Run("AutoPlay\\Docs\\nfw3.5.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Win Rar");
          result = File.Run("AutoPlay\\Docs\\WinRar4.20.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Flash Player");
          result = File.Run("AutoPlay\\Docs\\Adobe® Flash® Player.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Internet Download Manager");
          result = File.Run("AutoPlay\\Docs\\IDM-6.14.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Fire fox");
          result = File.Run("AutoPlay\\Docs\\Firefox.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Skype");
          result = File.Run("AutoPlay\\Docs\\SkypeFull.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Google Chrome");
          result = File.Run("AutoPlay\\Docs\\GoogleChrome21.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Yahoo! Messenger");
          result = File.Run("AutoPlay\\Docs\\Yahoo 11.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "????? ??????? ?????");
          result = File.Run("AutoPlay\\Docs\\Arabic Windows.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Super Copier");
          result = File.Run("AutoPlay\\Docs\\SuperCopier.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Format Factory");
          result = File.Run("AutoPlay\\Docs\\Format Factory 3.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Ultra ISO");
          result = File.Run("AutoPlay\\Docs\\UltraISO9.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Nero 8");
          result = File.Run("AutoPlay\\Docs\\Nero 8 Express .exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "????? ???? ???? ????");
          result = File.Run("AutoPlay\\Docs\\ze allah.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "anti autorun");
          result = File.Run("AutoPlay\\Docs\\antiautorun.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "avast");
          result = File.Run("AutoPlay\\Docs\\avast_7.exe", "", "", SW_SHOWNORMAL, true);

          Button.SetText("status", "Avira Internet Security");
          result = File.Run("AutoPlay\\Docs\\Avira Internet Security.exe", "", "", SW_SHOWNORMAL, true);


          Label.SetText("c1", "0");


          -------------------------------------------------


          Progress.SetVisible("Progress1", false);
          Button.SetVisible("status", false);


          Audio.Load(CHANNEL_NARRATION, "AutoPlay\\Audio\\1 (41).wav", true, false);
          ----------------------------------------


          confirmation2 = Dialog.Message("Basim Magdy", " تم تثبيت البرامج بنجاح\r\n يرجى إعادة تشغيل الكمبيوتر\r\nهل تريد إعادة تشغيل الكمبيوتر الآن ؟", MB_YESNO, MB_ICONNONE, MB_DEFBUTTON1);
          if confirmation2 == 6 then
          System.Reboot();
          Application.Exit(0);
          else
          -- The yes button was NOT pressed, do NOT allow the program to close (Return false)
          return false;
          end
          else
          -- The yes button was NOT pressed, do NOT allow the program to close (Return false)
          return false;
          end

          تحديد الكل

          Button.SetEnabled("Button1", true);


          CheckBox.SetChecked("Box01", true);
          CheckBox.SetChecked("Box02", true);
          CheckBox.SetChecked("Box03", true);
          CheckBox.SetChecked("Box04", true);


          عدم تحديد الكل

          Button.SetEnabled("Button1", false);


          CheckBox.SetChecked("Box01", false);
          CheckBox.SetChecked("Box02", false);
          CheckBox.SetChecked("Box03", false);
          CheckBox.SetChecked("Box04", false);

          تعليق


          • #6
            يا اخواني الموضوع مش محتاج ملف مفتوح كل الي محتاجه زر يقوم بتحديد والعاء تحديد مجموعه CheckBox

            تعليق


            • #7
              تحديد الكل

              Button.SetEnabled("Button1", true);


              CheckBox.SetChecked("Box01", true);
              CheckBox.SetChecked("Box02", true);
              CheckBox.SetChecked("Box03", true);
              CheckBox.SetChecked("Box04", true);


              عدم تحديد الكل

              Button.SetEnabled("Button1", false);


              CheckBox.SetChecked("Box01", false);
              CheckBox.SetChecked("Box02", false);
              CheckBox.SetChecked("Box03", false);
              CheckBox.SetChecked("Box04", false);[/QUOTE]

              الا يكفيك هذا ايها الطيب؟ واحد للتحديد والاخر لالغاء التحديد

              تعليق


              • #8
                هذا هو الكود لوضع الذي يوضع علي الزر للتحديد والغاء تححديد الشيك بوكس

                كود:
                ---seleccionar o deselecciona
                c1 = CheckBox.GetChecked("CheckBox1")
                c2 = CheckBox.GetChecked("CheckBox2")
                c3 = CheckBox.GetChecked("CheckBox3")
                c4 = CheckBox.GetChecked("CheckBox4")
                
                if(c1==false or c2==false or c3==false or c4==false) then
                CheckBox.SetChecked("CheckBox1", true)
                CheckBox.SetChecked("CheckBox2", true)
                CheckBox.SetChecked("CheckBox3", true)
                CheckBox.SetChecked("CheckBox4", true)
                else
                CheckBox.SetChecked("CheckBox1", false)
                CheckBox.SetChecked("CheckBox2", false)
                CheckBox.SetChecked("CheckBox3", false)
                CheckBox.SetChecked("CheckBox4", false)
                end
                يغلق

                تعليق

                مواضيع تهمك

                تقليص

                المنتدى: القسم العام نشرت بواسطة: Reem2Rabeh الوقت: 04-23-2025 الساعة 04:27 PM
                المنتدى: ضبط وتوكيد الجودة نشرت بواسطة: HeaD Master الوقت: 04-15-2025 الساعة 09:30 AM
                المنتدى: التصنيع والانتاج نشرت بواسطة: HeaD Master الوقت: 04-11-2025 الساعة 01:08 PM
                المنتدى: القسم العام نشرت بواسطة: نوال الخطيب الوقت: 03-19-2025 الساعة 03:07 AM
                المنتدى: الكمبيوتر والإنترنت نشرت بواسطة: عوض السوداني الوقت: 03-18-2025 الساعة 07:22 AM
                يعمل...
                X