first fix for jumping textbox

app/DD_PM_WINDREAM/frmFormDesigner.vb

@@ -628,6 +628,12 @@ Public Class frmFormDesigner
         Dim CurrentPosition = CurrentControl.Location
         Dim OldPosition As Point = DirectCast(pgControls.SelectedObject, BaseProperties).Location
 
+        If CurrentPosition.X = OldPosition.X + 2 And CurrentPosition.Y = OldPosition.Y + 2 Then
+            CurrentControl.Location = New Point(CurrentPosition.X - 2, CurrentPosition.Y - 2)
+            MyBase.Cursor = Cursors.Default
+            Exit Sub
+        End If
+
         If Not Point.op_Inequality(CurrentPosition, OldPosition) Then
             MyBase.Cursor = Cursors.Default
             Exit Sub