fix: crash when moving added column to very bottom

ansgarbecker · ansgarbecker · commit b739799d3c98 · 2026-02-10T18:47:03.000+01:00
Closes #2400
diff --git a/source/table_editor.pas b/source/table_editor.pas
@@ -1217,6 +1217,8 @@ procedure TfrmTableEditor.listColumnsDragDrop(Sender: TBaseVirtualTree;
     NewIndex := FColumns.IndexOf(ToCol^);
     if Mode = dmBelow then
       Inc(NewIndex);
+    // Fix crash when moving to very bottom
+    NewIndex := Min(NewIndex, FColumns.Count-1);
     FColumns.Move(FColumns.IndexOf(FocusedCol^), NewIndex);
     FocusedCol.Status := esModified;
     Modification(Sender);
