How to convert PNG to AVI video in Visual C# and VB .NET using Bytescout Image To Video SDK

These samples show how to convert sequence of PNG to AVI video.

Image To Video SDK provides set of methods and properties for converting images to video slideshow with transitions, slide effects, background music and color.

Convert PNG to video in Visual C# or Visual Basic .NET using the source codes below.

VISUAL C#

using System;
using System.Diagnostics;
using BytescoutImageToVideoLib;

namespace SimpleSlideshow
{
    class Program
    {
        static void Main(string[] args)

        {
                        Console.Write("Converting PNG slides into video, please wait..");

            // Create BytescoutImageToVideoLib.ImageToVideo object instance

            ImageToVideo converter = new ImageToVideo();

            // Activate the component
            converter.RegistrationName = "demo";

            converter.RegistrationKey = "demo";

            // Add images and set the duration for every slide
            Slide slide;

            slide = (Slide) converter.AddImageFromFileName("..\..\..\..\slide1.png");

            slide.Duration = 3000; // 3000ms = 3s
            slide = (Slide) converter.AddImageFromFileName("..\..\..\..\slide2.png");

            slide.Duration = 3000;
            slide = (Slide) converter.AddImageFromFileName("..\..\..\..\slide3.png");

            slide.Duration = 3000;

            // Set output video size
            converter.OutputWidth = 400;

            converter.OutputHeight = 300;

            // Set output video file name
            converter.OutputVideoFileName = "result.avi";

            // Run the conversion
            converter.RunAndWait();

                        Console.WriteLine("Conversion is done. Press any key to continue..");

                        Console.ReadKey();


            // Open the result video file in default media player
            Process.Start("result.avi");

        }
    }
}

VISUAL BASIC .NET

Imports BytescoutImageToVideoLib


Module Module1

    Sub Main()

        Console.WriteLine("Converting PNG slides into video, please wait..")

        ' Create BytescoutImageToVideoLib.ImageToVideo object instance
        Dim converter As ImageToVideo = New ImageToVideo()

        ' Activate the component
        converter.RegistrationName = "demo"
        converter.RegistrationKey = "demo"

        ' set default in effect for slides (you can also set effects for each single slide)
        converter.Slides.DefaultSlideInEffect = 1 ' teFadeIn (1) - fades in effect for slides transition
        converter.Slides.DefaultSlideInEffectDuration = 500 ' 500 msec for in effect


        ' Add images and set the duration for every slide
        Dim slide As Slide
        slide = CType(converter.AddImageFromFileName("........slide1.png"), Slide)

        slide.Duration = 3000 ' 3000ms = 3s
        slide = CType(converter.AddImageFromFileName("........slide2.png"), Slide)

        slide.Duration = 3000
        slide = CType(converter.AddImageFromFileName("........slide3.png"), Slide)

        slide.Duration = 3000

        ' Set output video size
        converter.OutputWidth = 400

        converter.OutputHeight = 300

        ' Set output video file name
        converter.OutputVideoFileName = "result.avi"

        ' Run the conversion
        converter.RunAndWait()

        Console.WriteLine("Conversion is done. Press any key to continue...")

        Console.ReadKey


        ' Open the result video file in default media player
        Process.Start("result.avi")

    End Sub

End Module