The RadDock has a service to control Drag And drop and the Telerik documentation shows how to stop drag and drop via this service. The example uses a Generic Method that at the time of this writing isn't supported. This article will show the way around it using reflection.

The suggested C# code to do this is:
-----------------

DragDropService service = this.radDock1.GetService<DragDropService>();
service.Stop(false);
=========
The GetService call above is a Generic Method and currently not supported by OpenEdge ABL.

In order to stop the Drag and Drop functionality of the RadDock control, you need to use code like this:
 

method private void StopDragDrop(  ):
        define variable fi as System.Reflection.FieldInfo.
        fi = This-object:radDock1:GetType():GetField("services",System.Reflection.BindingFlags:NonPublic Or System.Reflection.BindingFlags:Instance).
        DEFINE VARIABLE services AS CLASS         "Dictionary<Integer,RadDockService>".
        define variable so       as System.Object.

        so = fi:GetValue(this-object:radDock1).
        services = cast(so,"System.Collections.Generic.Dictionary<Integer,Telerik.WinControls.UI.Docking.RadDockService>").
        define variable service as DragDropService.
        define variable i as integer.
        define variable j as integer.
        define variable s as RadDockService.
    
        do i = 1 to services:count:
            j = i - 1. 
            s = services:item[j].
            service = cast(s,DragDropService) no-error.
            If valid-object(service) then
            service:Starting:Subscribe(serviceStarting).
        end.    
        return.

    end method.

METHOD PUBLIC VOID serviceStarting(sender As System.Object, e As StateServiceStartingEventArgs  ):
        e:Cancel = true.
        RETURN.

    END METHOD.

 

Progress Article(s):
000057503, "Can I use generic methods with Telerik controls?"