public RadForm1()
        {
            InitializeComponent();

            this.radWebCam1.AutoStart = false; 
        }

        protected override void OnLoad(EventArgs e)
        {
            base.OnLoad(e);

            ReadOnlyCollection<MediaFoundationDeviceInfo> videoDevices = RadWebCam.GetVideoCaptureDevices();
            ReadOnlyCollection<MediaFoundationVideoFormatInfo> videoFormats = RadWebCam.GetVideoFormats(videoDevices[0], true);
            ReadOnlyCollection<MediaFoundationDeviceInfo> audioDevices = RadWebCam.GetAudioCaptureDevices();

            radWebCam1.Initialize(videoDevices[0], videoFormats[0], audioDevices[0]);
        }

        protected override void OnShown(EventArgs e)
        {
            base.OnShown(e);
           
            radWebCam1.Start();       
        } 

this.radGridView1.MaximumSize = new Size(1000,1000);

        public RadForm1()
        {
            InitializeComponent(); 

            this.radPictureBox1.ContextMenuItemClick += RadPictureBox1_ContextMenuItemClick;
        }

        private void RadPictureBox1_ContextMenuItemClick(object sender, HandledEventArgs e)
        {
            if (sender == this.radPictureBox1.ContextMenuProperties.PasteItem)
            {
                e.Handled = true;
                // Image extractedImage = // get image with transparency; 
                // this.radPictureBox1.Image = extractedImage;
            }
        }

ThemeResolutionService.ApplicationThemeName = "Office2019Dark";
this.radDropDownList1.EnableAlternatingItemColor = true;

************** Exception Text **************
System.NullReferenceException: Object reference not set to an instance of an object.
   at Telerik.WinControls.UI.RadPictureBoxElement.UpdateParentControl()
   at Telerik.WinControls.UI.RadPictureBoxElement.OnParentChanged(RadElement previousParent)
   at Telerik.WinControls.RadElement.SetParent(RadElement parent)
   at Telerik.WinControls.RadElement.ChangeCollection(RadElement child, ItemsChangeOperation changeOperation)
   at Telerik.WinControls.RadElementCollection.OnInsertComplete(Int32 index, Object value)
   at System.Collections.CollectionBase.System.Collections.IList.Add(Object value)
   at Telerik.WinControls.RadElementCollection.Add(RadElement value)
   at _1574930GanttCustomDataItem.RadForm1.customGanttViewTextViewCellElement.CreateChildElements() in C:\Projects\1574930GanttCustomDataItem\1574930GanttCustomDataItem\RadForm1.vb:line 75
   at Telerik.WinControls.RadElement.CallCreateChildElements()
   at Telerik.WinControls.RadElement.Construct()
   at Telerik.WinControls.RadElement..ctor()
   at Telerik.WinControls.RadItem..ctor()
   at Telerik.WinControls.UI.GanttViewTextViewCellElement..ctor(GanttViewTextItemElement owner, GanttViewTextViewColumn column)
   at _1574930GanttCustomDataItem.RadForm1.customGanttViewTextViewCellElement..ctor(GanttViewTextItemElement owner, GanttViewTextViewColumn column) in C:\Projects\1574930GanttCustomDataItem\1574930GanttCustomDataItem\RadForm1.vb:line 59
   at _1574930GanttCustomDataItem.RadForm1.radGanttView1_DataCellElementCreating(Object sender, GanttViewDataCellElementCreatingEventArgs e) in C:\Projects\1574930GanttCustomDataItem\1574930GanttCustomDataItem\RadForm1.vb:line 51
   at Telerik.WinControls.UI.RadGanttViewElement.OnDataCellCreating(GanttViewDataCellElementCreatingEventArgs e)
   at Telerik.WinControls.UI.GanttViewTextViewCellElementProvider.CreateElement(GanttViewTextViewColumn data, Object context)
   at Telerik.WinControls.UI.BaseVirtualizedElementProvider`1.GetElement(T data, Object context)
   at Telerik.WinControls.UI.BaseVirtualizedContainer`1.UpdateElement(Int32 position, T data)
   at Telerik.WinControls.UI.BaseVirtualizedContainer`1.MeasureElements()
   at Telerik.WinControls.UI.BaseVirtualizedContainer`1.MeasureOverride(SizeF availableSize)
   at Telerik.WinControls.RadElement.MeasureCore(SizeF availableSize)
   at Telerik.WinControls.RadElement.Measure(SizeF availableSize)
   at Telerik.WinControls.UI.LightVisualElement.MeasureElements(SizeF availableSize, SizeF clientSize, Padding borderThickness)
   at Telerik.WinControls.UI.LightVisualElement.MeasureOverride(SizeF availableSize)
   at Telerik.WinControls.RadElement.MeasureCore(SizeF availableSize)
   at Telerik.WinControls.RadElement.Measure(SizeF availableSize)
   at Telerik.WinControls.UI.VirtualizedStackContainer`1.MeasureElementCore(RadElement element, SizeF availableSize)
   at Telerik.WinControls.UI.VirtualizedStackContainer`1.MeasureElement(IVirtualizedElement`1 element)
   at Telerik.WinControls.UI.BaseVirtualizedContainer`1.MeasureElements()
   at Telerik.WinControls.UI.BaseVirtualizedContainer`1.MeasureOverride(SizeF availableSize)
   at Telerik.WinControls.RadElement.MeasureCore(SizeF availableSize)
   at Telerik.WinControls.RadElement.Measure(SizeF availableSize)
   at Telerik.WinControls.UI.GanttViewTextViewElement.MeasureOverride(SizeF availableSize)
   at Telerik.WinControls.RadElement.MeasureCore(SizeF availableSize)
   at Telerik.WinControls.RadElement.Measure(SizeF availableSize)
   at Telerik.WinControls.UI.RadGanttViewElement.MeasureOverride(SizeF availableSize)
   at Telerik.WinControls.RadElement.MeasureCore(SizeF availableSize)
   at Telerik.WinControls.RadElement.Measure(SizeF availableSize)
   at Telerik.WinControls.RootRadElement.MeasureOverride(SizeF availableSize)
   at Telerik.WinControls.RootRadElement.MeasureCore(SizeF availableSize)
   at Telerik.WinControls.RadElement.Measure(SizeF availableSize)
   at Telerik.WinControls.RadElementTree.PerformInnerLayout(Boolean performMeasure, Int32 x, Int32 y, Int32 width, Int32 height)
   at Telerik.WinControls.RadControl.OnLoad(Size desiredSize)
   at Telerik.WinControls.RadControl.LoadElementTree(Size desiredSize)
   at Telerik.WinControls.RadControl.OnCreateControl()
   at System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
   at System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
   at System.Windows.Forms.Control.CreateControl()
   at System.Windows.Forms.Control.WmShowWindow(Message& m)
   at System.Windows.Forms.Control.WndProc(Message& m)
   at System.Windows.Forms.ScrollableControl.WndProc(Message& m)
   at System.Windows.Forms.Form.WmShowWindow(Message& m)
   at System.Windows.Forms.Form.WndProc(Message& m)
   at Telerik.WinControls.UI.RadFormControlBase.WndProc(Message& m)
   at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
   at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
   at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)


************** Loaded Assemblies **************

this.radCollapsiblePanel1.EnableAnimation = false;

        protected override void OnShown(EventArgs e)
        {
            base.OnShown(e); 
            this.radWebCam1.Resize += RadWebCam1_Resize; 
        }


        Timer t = new Timer();
        bool isPaused = false;
        private void RadWebCam1_Resize(object sender, EventArgs e)
        {
            t.Stop();
            if (isPaused)
            {
                t = new Timer();
                t.Interval = 100;
                t.Tick += T_Tick; 
                this.radWebCam1.Start();
                t.Start();
            } 
        }

        private void T_Tick(object sender, EventArgs e)
        {
            this.radWebCam1.Pause();
            isPaused = true;
            t.Stop();
        }
        protected override bool ProcessCmdKey(ref Message msg, Keys keyData)
        {
            if (keyData == Keys.Space)
            {
                this.radWebCam1.Pause();
                isPaused = true;
            }

            return base.ProcessCmdKey(ref msg, keyData);
        }

    internal static class Program
    {
        /// <summary>
        /// The main entry point for the application.
        /// </summary>
        [STAThread]
        static void Main()
        {
            RadControl.EnableRadAutoScale = true;
            Application.EnableVisualStyles();
            Application.SetCompatibleTextRenderingDefault(false);


            string text = "Are you sure you want to exit?";
            string caption = "Application";
            RadMessageIcon icon = RadMessageIcon.Question;
            RadMessageBox.Show(text, caption, MessageBoxButtons.YesNo, icon);

            RadMessageBox.Show(text, caption, MessageBoxButtons.YesNoCancel, icon); 
       

RadControl.EnableRadAutoScale = false;

Me.RadListView1.ListViewElement.DragDropService = New CustomListViewDragDropService(Me.RadListView1.ListViewElement)

    Public Class CustomListViewDragDropService
        Inherits ListViewDragDropService

        Public Sub New(owner As RadListViewElement)
            MyBase.New(owner)
        End Sub
        Protected Overrides Sub OnPreviewDragOver(e As RadDragOverEventArgs)
            MyBase.OnPreviewDragOver(e)
        End Sub
        Protected Overrides Sub HandleMouseMove(mousePos As Point)
            If Not Me.Initialized Then
                MyBase.HandleMouseMove(mousePos)
            End If

            Dim mi As MethodInfo = GetType(RadDragDropService).GetMethod("DoDrag", BindingFlags.Instance Or BindingFlags.NonPublic)
            mi.Invoke(Me, New Object() {mousePos})

            Dim fi2 As FieldInfo = GetType(RadDragDropService).GetField("beginPoint", BindingFlags.Instance Or BindingFlags.NonPublic)
            fi2.SetValue(Me, mousePos)

            Dim fi As FieldInfo = GetType(ListViewDragDropService).GetField("dragHintWindow", BindingFlags.Instance Or BindingFlags.NonPublic)

            Dim dragHintWindow = fi.GetValue(Me)

            If dragHintWindow Is Nothing AndAlso Me.CanCommit Then
                Me.PrepareDragHint()
            End If

            Me.UpdateDragHintLocation(mousePos)
            Dim viewElement As RadListViewElement = Me.Owner
            Dim item As BaseListViewVisualItem = TryCast(Me.DropTarget, BaseListViewVisualItem)

            If item IsNot Nothing AndAlso item.Data IsNot Nothing AndAlso Not item.Data.Owner.Equals(viewElement) Then
                viewElement = item.Data.Owner
            End If

            Dim clientPos As Point = viewElement.PointFromScreen(mousePos)

            If (clientPos.Y < 0 AndAlso viewElement.ViewElement.Orientation = Orientation.Vertical) OrElse (clientPos.X < 0 AndAlso viewElement.ViewElement.Orientation = Orientation.Horizontal) Then
                viewElement.ViewElement.Scroller.Scrollbar.PerformSmallDecrement(1)
            ElseIf (clientPos.Y > viewElement.Size.Height AndAlso viewElement.ViewElement.Orientation = Orientation.Vertical) OrElse (clientPos.X > viewElement.Size.Width AndAlso viewElement.ViewElement.Orientation = Orientation.Horizontal) Then
                viewElement.ViewElement.Scroller.Scrollbar.PerformSmallIncrement(1)
            End If
        End Sub
    End Class