HnHn

أفضل طريقة لتحكم في تشغيل الفلاش

40 ردود في هذا الموضوع

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

أخواني هذا الكود بصراحة من أفضل الأكواد تقريبا لتشغيل ملفات الفلاش swf

أولا قم بالضغط على زري Ctrl + T

وأضف الأداة التالية shock wave flash

ثانياً: قم بإدراج الأداة في الفورم بالحجم اللي تبيه

ثالثاً: اضف 5 أزرار أوامر command button ومن ثم عدل الخاصية caption لتصبح كالتالي

الزر الأول تشغيل

الزر الثاني الأمام

الزر الثالث الخلف

الزر الرابع تكبير

الزر الخامس تصغير

والآن قم بوضع الكود التالي في المشروع

**************************************

في التعريف العام للفورمGeneral نضع هذا الكود

Private Sub ShockwaveFlash2_FSCommand(ByVal command As String, ByVal args As String) 
If (command = "Zoom") Then
ShockwaveFlash1.Zoom (args)
Else
MsgBox (args)
End If
End Sub

في حدث التحميل للفورم Form_Load نضع هذا الكود

Private Sub Form_Load() 
ShockwaveFlash1.Movie = App.Path + "\k.swf"
End Sub

وفي حدث زر التشغيل نكتب

Private Sub Play_Click() 
ShockwaveFlash1.GotoFrame (0)
ShockwaveFlash1.Play
End Sub

وفي حدث زر للأمام نكتب

Private Sub Forward_Click() 
ShockwaveFlash1.Forward
End Sub

وفي حدث زر للخلف نكتب

Private Sub Back_Click() 
ShockwaveFlash1.Back
End Sub

وفي حدث زر التكبير نكتب

Private Sub ZoomIn_Click

() 
ShockwaveFlash1.Zoom (50)
End Sub

وفي حدث زر التصغير نكتب

Private Sub ZoomOut_Click() 
ShockwaveFlash1.Zoom (200)
End Sub

أنتهــــــى

*****************************

حمل المثال من هنا

:D

flash.zip

تم تعديل بواسطه HnHn
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

السلام عليكم ...

شفرة مميزة جداً اخى HnHn كما عودتنا دوماً ... بارك الله لك في مجهوداتك هذه و وقتك ..

بنت اليمن ...

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

لا نتردد ابدا في طرح ما هو مفيد يصورة مبسطة

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

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

لا استطيع كيف اشكرك بعد ما بذلتيه من مجهود فى استنطبات هذه الاكواد ولا استطيع ان اخبرك بانى قد قمت باستدعاء الزر لتشغيل الفلاش ولكنى لم استطع ايجاد الاكواد اللازمة للتشغيل وكان هذا يؤرقنى

بارك الله فيكى ارحتى خلدنا وغذيتى عقولنا

اخوكم BigMan

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

رائع أخي HnHn

وهذا ما نتوقعه دوما من كل متميز أمثال أفضالك

:)

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

السلام عليکم

حبيت ان انوه بأن هناک طريقة ثانية و سبق وقد خليتها في المنتدى و هي تفيد لارسال و أخذ بارامترات عن طريق الفلاش

التفاعل مع الفلاش

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

ماذا عن ملف الفلاش الexeهل استطيع التحكم به او اخذملف الswf منه؟ وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

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

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

أخي العزيز :

توجد برامج تقوم بتحويل ملفات الفلاش ذات الامتداد EXE إلى الامتداد SWF

كما توجد برامج تحول من الامتداد SWF إلى الامتداد FLA

وتقبل تحياتي

أخوك / المبرمج أحمد

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

اخوى ممكن تكمل جميلك

وتقولى كيف امنع حدث الزر الايمن للماوس

على اداة الـ الفلاش shockwaveflash

وتسلم لينا

مع انى قمت بوضع سؤال على هذا لكن للاسف

محدش رد

اتمنى ان تدلنى

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

أضم صوتي إلى صوت الأخ rockmafja في سؤاله عن كود لإلغاء قائمة الزر الأيمن للماوس

نتمنى الإجابة بأسرع وقت.. إذا كان هناك إجابة!!..

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

افضل مثال للتعامل مع فلاش:

http://www.pscode.com/vb/scripts/ShowCode....=21364&lngWId=1

افضل مثال لالغاء قائمة الزر الايمن لفلاش:

http://www.pscode.com/vb/scripts/ShowCode....=36308&lngWId=1

للتحكم بقائمة الزر الايمن لفلاش عن طريق فلاش:

http://www.arabteam2000-forum.com/index.php?showtopic=36271

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

شكراً للأخ amervb على هذه الأمثلة، لقد درست اثنين منها واكتشفت طريقة عدم إظهار قائمة الزر الأيمن للفلاش في VB فقط.

وللفائدة أذكرها؛

عليك تغير خاصية WMode للـ Flash ActiveX المضاف إلى الـ Form إلى Transparent، فقط!.

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

صحيح ولكن هذه الخاصيه تسبب بطئ شديد لعرض المشهد

الا اذا كان امشهد صغير فلا بأس في ذلك.

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

إذا ربما لا تكتمل (عرض جيد وبدون قائمة About Flash)، إلا إذا كان هناك طريقة أخرى؟؟؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

طبعا يوجد طريقه اخرى ولقد ذكرتها في ردي الاول الذي فيه الروابط و سوف اعيدها:

افضل مثال للتعامل مع فلاش:

http://www.pscode.com/vb/scripts/ShowCode....=21364&lngWId=1

افضل مثال لالغاء قائمة الزر الايمن لفلاش:

http://www.pscode.com/vb/scripts/ShowCode....=36308&lngWId=1

للتحكم بقائمة الزر الايمن لفلاش عن طريق فلاش:

http://www.arabteam2000-forum.com/index.php?showtopic=36271

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

شكرا الك اخوي..وشكرا لجميع المساهمات الفاعله بالحقيقه..

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

مشكور و ما قصرت ... موضوع رائع

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

مشكوووووووووووووووووووووووووووووووووووووووووووووور :lol:

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

مشكور اخي

و بارك الله فيك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

شكرا جزيلا الأخ هنهن ممكن تكملوا معروفكم و تقولولنا طريفة التوقفstop

و طريقة التكرار loop

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

هل من طريقة للفلاش لعمل loop و stop وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

شكرا أخي الكريم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

مشكور أخي لقد إستفدت بقوة

مشكور ثانية و أنا من الداعين لك

مشكوووور

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .