[サンプルコード]
1.派生クラス定義の例 押されるとTitleの文字列が変わるボタン
class MyButton extends Button{
Width = 50;
Height = 20;
Title = “ボタン”;
Function OnTouch(e){
Title = “Pushed!”;
}
}
2.Packageを画面定義ファイルと同じファイル内で定義する例
Package MyPackage{
class MyButton extends Button{
/* 1.のclass定義と同じ */
}
}
MyButton mbButton1{
x = 10;
y = 20;
}
3.Packageを画面定義ファイルと別ファイルに定義する例
<Cls_001.crs>
import “MyPackage.crs”;
Form Form1{
Width = 300;
Height = 180;
MyButton mbButton1{
x = 10;
y = 20;
}
}
<MyPackage.crs>
Package MyPackage{
/* 2.のPackage定義と同じ */
}
CRSファイル形式のサンプルを
「Class定義サンプル(Cls_001.zip)」
よりご利用いただけます。
|