＜Obj_008.crs＞
import "Package1.crs";

Form Obj_008 {
 X = 0;
 Y = 0;
 Width = 400;
 Height = 300;
 
 /* 派生クラスのオブジェクトを格納するArrayオブジェクト定義 */
 Array arr;
 
 if ( !$DESIGNTIME ) {
   /* 派生クラス(ボタン)のオブジェクトを生成し、 */
   /* Arrayオブジェクトへ格納する */
   arr[0] = BlueButton BlueButton1;
   arr[1] = BlueButton BlueButton2;
   arr[2] = BlueButton BlueButton3;
   
  for ( var i = 0 ; i < 3 ; i++ ){ 
   if (i == 0){
    /* 最初のボタンの位置 */
    arr[i].x = 50;
    arr[i].y = 20;
   }else{
    /* ２つ目以降のボタンの位置 */
    arr[i].x = 50;
    arr[i].y = arr[i-1].y + 30;
   }
  }
 }
 
 Button Button1 {
  X = 200;
  Y = 20;
  Width = 164;
  Height = 60;
  Title = "上から2番目のプロパティを\n書き換える";
  
  Function OnTouch( e ) {
   ^.arr[1].BgColor = $FF3333;
   ^.arr[1].Title = "RedButton";
  }
 }

＜Package1.crs＞
package Package1{
 class BlueButton extends ImageButton {
  Width = 120;
  Height = 30;  
  BgColor = $9999FF;
  FgColor = $WHITE;
  FontFace = $BOLD;
  Title = "BlueButton";
 }
}