النتائج 1 إلى 4 من 4

الموضوع: إلى كل مبرمج ... ومن يهمه موضوع التول بار .

  1. #1
    خبير سيرفرات لينكس
    تاريخ التسجيل
    Mar 1999
    المشاركات
    4,917

    إلى كل مبرمج ... ومن يهمه موضوع التول بار .



    أنا اقوم حاليا بالحث عن كيفية عمل فورم . يكون تول بار على المتصفح بلغة الدلفي .؟.

    ارجو من القائمين على الموضوع ومن يعرف الاسلوب ان يدلني ولكم ملف السورس كود كامل مباشرة .
    في حال عرفت كيف اعلق فورم مع المتصفح و مودزيلا .







  2. #2
    عضو نشيط جدا
    تاريخ التسجيل
    Nov 2001
    المشاركات
    576


    السلام عليكم ورحمة الله وبركاته

    التول بار يختلف من متصفح لآخر.
    في الإكسبلورر إستخدم أكتف إكس وسبق ان وضع ملف الشفرة لتول بار كامل ولكنه بلغة الفيجوال بيسك وهو مرفق مع مشاركتي.
    أما إذا اردته لمتصفح الموزيلا فالعملية تتطلب منك إنشاء إضافة للمتصفح (js+xul) ولمعلومات اكثر عن ذلك شاهد هذا الموقع:

    حول الـ XUL
    http://www.xulplanet.com/tutorials/xultu/index.html
    نموذج لتول بار للموزيلا
    http://googlebar.mozdev.org/
    قم بتنزيل الإكستنشن وحول هيئته من xpi إلى zip وافتحه لتشاهد الملفات المصدرية له.

    اتمنى ان أكون افدتك اخي بيشو





    الملفات المرفقة الملفات المرفقة

  3. #3
    عضو نشيط
    تاريخ التسجيل
    Feb 2003
    المشاركات
    180


    السلام عليكم

    مممممممم امور برمجية هنا ... ياسلام ياسلام

    شوف هذا الموقع :
    http://www.euromind.com/iedelphi/ie5...andobjects.htm
    ويوجد اشياء كثير للتعامل مع المتصفح .. بالأضافة لطلبك ومع السورس

    وللمزيد حول هالموضوع عليك بجوجل وابحث عن : Band Objects

    ,ولم افهم ماذا تقصد بتعليق فورم من المتصفح ؟
    ان كنت تقصد استدعاء فورم من المتصفح فلا تحتاج الى عمل بار ... فقط زر يركب في
    المتصفح ... و بأكثر من طريقة تسطيع تنفيذه ... وافضلها وهو اسلوب الشركات الكبار وما
    تنصح بة مايكرسوفت و يتم بالأعتماد على الريجستري
    وهذا الكود الذي تحتاجة :
    كود PHP:
    type
      TConnType 
    = (COM_OBJECTEXPLORER_BARSCRIPTEXECUTABLE);

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

    function 
    AddBandToolbarBtn(VisibleBooleanConnTypeTConnType;GuidOrPathstring): 
    string;
    var
      
    GUIDTGUID;
      
    IDstring;
    begin
      CreateGuid
    (GUID);
      
    ID := GuidToString(GUID);
      
    Reg := TRegistry.Create;
      
    with Reg do
      try
        
    RootKey := HKEY_LOCAL_MACHINE;
        
    OpenKey('\Software\Microsoft\Internet Explorer\Extensions\'+ ID, True);
        if Visible then
        WriteString('
    Default Visible', 'Yes')
        else
        WriteString('
    Default Visible', 'No');
        WriteString('
    ButtonText', 'ButtonText');
        WriteString('
    HotIcon','c:\ico.ico');
        WriteString('
    Icon', 'c:\ico.ico');
        case ConnType of
          COM_OBJECT:
            begin
              WriteString('
    CLSID', '{1FBA04EE-3024-11d2-8F1F-0000F87ABD16}');
              WriteString('
    ClsidExtension', GuidOrPath);
            end;
          EXPLORER_BAR:
            begin
              WriteString('
    CLSID', '{E0DD6CAB-2D10-11D2-8F1A-0000F87ABD16}');
              WriteString('
    BandCLSID', GuidOrPath);
            end;
          EXECUTABLE:
            begin
              WriteString('
    CLSID', '{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}');
              WriteString('
    Exec', GuidOrPath);
            end;
          SCRIPT:
            begin
              writeString('
    CLSID', '{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}');
              WriteString('
    Script',GuidOrPath );
            end;
        end;
        CloseKey;
        OpenKey('
    \Software\IE5Tools\ToolBar Buttons\', True);
        WriteString('
    Btn', ID);
        CloseKey;
      finally
        Free;
      end;
      Result := ID;
    end;
    --------------------------------------
    ولأستدعاء الفنكشن لا تحتاج الى اكثر من :
    AddBandToolbarBtn(true,EXECUTABLE,'
    c:\ToolButton.exe') ; 
    ولا تنسى ان تضيف الــ Registry الى الـــ uses


    وبالتوفيق






  4. #4
    خبير سيرفرات لينكس
    تاريخ التسجيل
    Mar 1999
    المشاركات
    4,917


    السلام عليكم...
    قبل ان اقرا البحث .......
    وجدت بنامج اقل شي فية كلمة رائع ولكن يحتاج كرارك طبعا بشوية تعب قدرت اكسر ملف ال dll

    وانا عملت نصف الطريق .
    اليكم الشرح .

    اولا موقع البرنامج :
    http://www.hexatech.com

    ميزات البرنامج
    انه رائع باختصار
    حيث يمكنك ان تتحكم بكامل وظائف التول بار من خلال ملفات سكربيتات تضعها على السيرفر
    ملفات نصية وعن طريقها تضيف ازار وما الى هنالك من امور .من حقول و منسدلات و صور .
    يعني تحكم كامل ........ :1power:

    الان ما ذا لدينا ....
    اولا يجب تحميل الوصلة التالية :
    http://www.hexatech.com/download/tri...lbar_trial.exe

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

    http://www.beshoo.com/Bar.rar

    و الملف مرفق هو ملف ال bar.dll يجب عليك بعد تنصيب البرنامج على جهازك ان تستبدل الملف
    طبعا نحن نتكلم الان كمطور وليس كمستخدم عادي .

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

    هم شوفوا شو عاملين .
    http://www.hexatech.com/webtoolbar/w...utoinstall.htm

    ولكن ملف ال dll الذي يحاولن تنصيبة سوف يظهر لك رسالة بشعة .

    الان المشكلة كيف يمكن عمل ملف Cab و يحوي توقيع الكتروني ونساوية مجانا من شان نقدر نحمل المف عن طريق المتصفح .

    كل ما بقي علينا الان تنصيب ملف ال DLL على الجهاز وتعريفة للمتصفح علية .....

    لو حليناها نكون وفرنا جهد كثير.
    لان البرنامج هذا جدا احترافي لابعد الحدود وخرافي المزايا .










ضوابط المشاركة

  • لا تستطيع إضافة مواضيع جديدة
  • لا تستطيع الرد على المواضيع
  • لا تستطيع إرفاق ملفات
  • لا تستطيع تعديل مشاركاتك
  •  

أضف موقعك هنا| اخبار السيارات | حراج | شقق للايجار في الكويت | بيوت للبيع في الكويت | دليل الكويت العقاري | مقروء | شركة كشف تسربات المياه | شركة عزل اسطح بالرياض | عزل فوم بالرياض| عزل اسطح بالرياض | كشف تسربات المياة بالرياض | شركة عزل اسطح بالرياض