منتدى جزيرة الرياضيات

منتدى جزيرة الرياضيات (http://www.hesab.net/vb/index.php)
-   منتدى التعليم الإلكتروني (http://www.hesab.net/vb/forumdisplay.php?f=35)
-   -   الدرس الخامس عشر اضافة ملفات الفلاش(swf) في برنامج الباور بوينت (http://www.hesab.net/vb/showthread.php?t=3053)

الاستاذ خليل 07-30-2007 09:27 AM

الدرس الخامس عشر اضافة ملفات الفلاش(swf) في برنامج الباور بوينت
 
السلام عليكم

الدرس الجديد اضافة ملف فلاشي ببرنامج الباور بوينت بالصوت و الصورة

ننتظر تطبيقاتكم

الاستاذ خليل

zine pef 07-30-2007 03:32 PM

تطبيق عن الدرس15
 
اليكم اخي خليل و اخواني المشاركين هذا الواجب و اتمنى ان اكون في حسن ضنكم اخوكم zine
طقطق هنا:::


عندي استفسار عن الدرس المسابقة عملت بي VB6 و ظهر فيها خطأ صغير ولم اجد له الحل
زر الأجابة يظهر اطار متنقط اي الأجابة تكون واضحة
مسابقة VB6

refathafez 07-30-2007 04:54 PM

شكر جزيلا اخي الاشتاذ خليل
وجزاك الله خيرا

الاستاذ خليل 07-30-2007 08:42 PM

1 مرفق
zine pef شكرا على التشجيع

الملف مع التعديل بالمرفق
استبدلت الازرار جميعها بليبل بنفس الاسم و ضبطتت لانه توجد خاصية tab هي المسئولة عن الانتقال ب الزر tab و هي التي تسبب الحدود. و خاصية stoptab لا اراها تعمل المفروض ان توقف عملها لكن ما نفعت

توجد مسابقة بالاكسس و الفجوال بيسك ستنفعك ايضا اضغط هنا لم يلتفت اليها الاعضاء



الاستاذ خليل

zine pef 07-30-2007 09:30 PM

شكرا وتقدير
 
شكرا الأخ خليل على المعلومات ..... مسابقة الأخ حبيب موجودة عندي مند اسابيع و هي التي كانت شغلى بالي
و الحمد لله جاء الفرج من حضرتك من شرح الدرس.. شكرا...
سؤال بالنسبة للمسابقة ..اذا كانت الشريحة الأولى فيها 10 اسئلة و بعدها تنتهى ويخرج msgbox و يقول انتهت المسابقة ... اريد كود يتركك تذهب الى الشريحة 2 فيها ايضا اسئلة.. بعد تكملة اسئلة الشريحة 1

الاستاذ خليل 07-30-2007 09:36 PM

غير المسج الى انتقل للشريحة الثانية

كل ما صنعت برامج ستكون اكثر تقدما بالبرمجة

الاستاذ خليل

zine pef 07-30-2007 09:44 PM

شكرا اخي
هل اكتب::msgbox("انتقل الى slide2 ") ;و بعد الضغط على ok تنتقل الى slide2 شكرا

الاستاذ خليل 07-30-2007 10:11 PM

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

اكتب هذا الكود للانتقال للشريحة التالية :
كود:

Me.Parent.SlideShowWindow.View.Next
و للرجوع استخدم هذا الكود
كود:

Me.Parent.SlideShowWindow.View.Previous
الاستاذ خليل

Amel2005 07-31-2007 12:23 AM

السلام عليكم ورحمة الله وبركاته .
أستاذنا الفاضل الأستاذ خليل
زادكم الله عزا وعلما...

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

أخى الفاضل / zine pef
جرب الكود التالى :
كود PHP:

ActivePresentation.SlideShowWindow.View.GotoSlide 3 

حيث يمكن استبدال الرقم ثلاثة برقم الشريحة التى تريدها .
جرب ... والله أعلم بالنتيجة .

تحياتى لمجهوداتكم بارك الله فيكم.

zine pef 07-31-2007 01:08 AM

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

الاستاذ خليل 07-31-2007 10:05 AM

السلام عليكم
 
حياك الله zine pef شكرا

الاخت امل الذي يحكم هو العمل

اذا العمل يتطلب تغيير الفلاش اي متغير انصحك بالكود

اذا العمل ثابت اي الملف الفلاشي لن يتغير استعملي البرنامج افضل

و شكرا لتفاعلكم و اثراءكم للموضوع

refathafez 07-31-2007 07:09 PM

1 مرفق
السلام عليكم الدرس الخامس عشر وبدون الفلاشة
ارجو ان يحوذ اعجابكم اضافة فلاشة واختر الاجابة الصحيحة

الاستاذ خليل 08-01-2007 01:20 AM

شكرا استاذ بس يوجد خطأ بالكود
كود:

ShockwaveFlash1.Movie = Application.ActivePresentation.Path & "\ c.exe.swf"
سببه
النص
كود:

"\ c.exe.swf"
لانك وضغت مسافة بين \ و للحرف c الذي هو اسم الملف
و اخطأت ايضا بالباقي لان كاتب نوعية الملف exe و هو swf

التصحيح هو التالي

كود:

ShockwaveFlash1.Movie = Application.ActivePresentation.Path & "\c.swf"
و شكرا لك محاولة طيبة


الساعة الآن 06:50 AM

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. TranZ By Almuhajir