[سعود]

ودها تفكير شلون نحول 600 صورة بضغطة زر

[سعود]

كود :

Using timeline As New DefaultTimeline(25)

اخواني
الرقم 25 ماذا اكتب عوضا عنه علما ان سرعة المؤقت الذي يلتقط الصور 200 مل ثانية

[سعود]

اخواني احتاج مساعدة لاكمال التعديل على المثال

كود :

Dim i As Integer = IO.Directory.GetFiles(imagepath, "*.jpg").Count

هذا كما تعرفون يظهر عدد الصور في المجلد

كود :

Dim clip1 As IClip = videoTrack.AddImage(Application.StartupPath & "\image1.jpg", 0, 2)

هذا السطر كيف اصيغه بحيث يضيف كافة الصور؟؟؟؟
تحتاج محترف.

[سعود]

كود :

For Each fl In IO.Directory.GetFiles(imagepath, "*.jpg")                    Dim fn As String = IO.Path.GetFileName(fl)
                    Dim clip1 As IClip = videotrack.AddImage(imagepath & fn, 0, 2)


                Next

الحمدلله انهيت الجزء الخاص باضافة كافة صور المجلد لكن حبيت اسال عن

كود :

group.AddTransition(clip2.Offset - halfDuration, halfDuration, StandardTransitions.CreateFade(), True)            group.AddTransition(clip2.Offset, halfDuration, StandardTransitions.CreateFade(), False)

مالفرق بين السطرين؟؟؟

[سعود]

انهيت برمجة المثال وتفاجات بالخطا
وهذا المثال ارجو منكم التصحيح
http://vb4arb.com/vb/uploaded/34_01363757320.zip

[سعود]

يسال عن timelinebuilder.cs

[سعود]

http://vb4arb.com/vb/showthread.php?4392...#post15351

[سعود]

[سعود]

[سعود]

الفيلم المستخرج سيء للغاية يومض