local i if this.columns(1).ColumnOrder < this.LeftColumn && we scroll forward for i=this.columns(1).ColumnOrder to this.LeftColumn-1 this.columns(1).ColumnOrder = this.columns(1).ColumnOrder + 1 endfor ** next column line for i=this.columns(2).ColumnOrder to this.LeftColumn-1 this.columns(2).ColumnOrder = this.columns(2).ColumnOrder + 1 endfor else && we scroll backward for i=this.LeftColumn+1 to this.columns(1).ColumnOrder this.columns(1).ColumnOrder = this.columns(1).ColumnOrder - 1 endfor *** next column lock for i=this.LeftColumn+1 to this.columns(2).ColumnOrder this.columns(2).ColumnOrder = this.columns(2).ColumnOrder - 1 endfor endif