1.OnMouseDown: 用StringGrid.MouseToCell判断是否标题行, 如果是, 则
记录列号到个变量中.
2. OnMouseMove: 判断是否鼠标按下(是否在拖动), 如果是则显示移动图
案(如果你高兴这么做的话)
3. OnMouseUpp: 用StringGrid.MouseToCell判断当前鼠标所在的列.
4. 将旧列移动到新列的位置:
for i := 0 to StringGrid.RowCount - 1do
StringGrid.Rows.Move(老列号, 新列号);