SSpread SSpread1 {
  X = 16;
  Y = 69;
  Width = 565;
  Height = 221;
    
  /* スクロールせずに固定表示する列の数を設定 */
  ColsFrozen  = 2; 
  
  /* 使用できる列の総数を設定 */
  MaxCols = 10;
  /* 使用できる行の総数を設定 */
  MaxRows = 5;
  
  /* 列のドラッグ＆ドロップを有効に設定 */
  AllowColMove  = $TRUE;
  
  /* ユーザーがドラッグ&ドロップで列を移動した際の処理*/
  Function OnAfterColMove( e ) {
   
   /* 移動前列番号を取得 */
   var bfCol = e.Col;
   /* 移動先列番号を取得 */
   var afCol = e.ColDest;

   if(afCol > bfCol ){
    /* 移動行はドロップした行の前に移動されるため、列番号を-1する */
    afCol = afCol-1;
    
    /* 1列目、2列目を移動した場合、列を元に戻す */
    if (bfCol < 3) {
     while (bfCol != afCol){
      SwapColRange(afCol -1 , afCol-1 , afCol);
      afCol -- ;
     }
    }
   }else{
    /* 1列目、2列目へ列を移動した場合、列を元に戻す */
    if(afCol < 3){    
     while (bfCol != afCol){
      SwapColRange(afCol +1 , afCol+1 , afCol);
      afCol ++ ;
     }
    }
   }
  }

　・・・・（略）
}