要是用鼠标拖动改变的话,则会触发OnColumnDragged事件 Occurs when a column is dragged to a new position.property property OnColumnDragged: TNotifyEvent;DescriptionWrite an OnColumnDragged event handler to respond when the user drags a column to a new position. OnColumnDragged occurs after all columns are in their new positions but before the list view repaints to reflect the change.OnColumnClick only occurs when ViewStyle is vsReport and ShowColumnHeaders is True.Tip: To uniquely identify columns so that you can recognize them after they are repositioned, use the list column抯 Tag property.
Occurs when a column is dragged to a new position.property property OnColumnDragged: TNotifyEvent;DescriptionWrite an OnColumnDragged event handler to respond when the user drags a column to a new position. OnColumnDragged occurs after all columns are in their new positions but before the list view repaints to reflect the change.OnColumnClick only occurs when ViewStyle is vsReport and ShowColumnHeaders is True.Tip: To uniquely identify columns so that you can recognize them after they are repositioned, use the list column抯 Tag property.