API version 1

- ‐

RW

CRS::Common::UI::Border

border

オブジェクトの表示領域の枠を指定します。

Border オブジェクトを指定する以外に数値(定数)での指定法が用意されています。

初期値はクラス標準枠です。

関連項目

Border クラス

定数一覧

------------------------------------------------------------

定数値

説明

BORDER_NONE

-1:枠線なし。

BORDER_SUNKEN

0:全体を凹形状で表示します。

BORDER_RISED

1:全体を凸形状で表示します。

BORDER_ETCHED

2:枠線を凹形状で表示します。

BORDER_BUMP

3:枠線を凸形状で表示します。

BORDER_GRAYFRAME

4:2色の灰色で枠線を表示します。

BORDER_SOFT

5:白と黒で枠を表示します。

BORDER_SOFTETCHED

6:枠線をやわらかい凹形状で表示します。

BORDER_SOFTBUMP

7:枠線をやわらかい凸形状で表示します。

BORDER_PLANE

8:黒い一本線で表示します。

BORDER_DASH

9:長めの点線で表示します。

BORDER_DOT

10:細かい点線で表示します。

BORDER_FLATSUNKEN

11:全体を低い凹形状で表示します。

BORDER_FLATRISED

12:全体を低い凸形状で表示します。

BORDER_STD

65536:初期(無指定)状態に戻します。



使用例 CRSダウンロード

Form DisplayObj_p {
   x = 0;
   y = 0;
   width = 800;
   height = 600;

   /* このサンプルはテキストファイルをドラッグ&ドロップでお試しください */

   ListBox ListBox11 {
           x = 24;
           y = 32;
           width = 128;
           /* height = 100; */ # 無指定は100

           active = true ;  # falseで不活性
           acceptDrop = DROP_FILE;
           bgColor = "CYAN" ;
           inactiveBgColor = "BLACK" ;
           border = BORDER_DASH ;
           clipLeft = 25 ;
           clipTop = 5 ;
           opacity = 0.5 ;
           tabindex = 2;

           Function OnDropped(e) {
                           ^.EditBox12.value = e.Data.Read();
           }
   }

   EditBox EditBox12 {
           x = 176;
           y = 48;
           width = 200;
           /* height = 80; */ # 無指定は100

           Border = BORDER_SUNKEN;
           fgColor = "RED" ;
           inactiveFgColor = "WHITE" ;
           font = new Font("MS 明朝",16) ;

           /* 以下の項目は実際に試してみてください。
           scroll = SCROLL_NONE ;
           scrollBarSize = 30 ;
           tabindex = 1 ;
           */
           title = "内容表示" ;
   }

   Label label1 {
           x = 32;
           y = 8;
           width = 192;
           height = 16;
           title = "下の枠にテキストファイルをドロップ" ;
   }

   NumberEdit NumberEdit11[2] {
           x = 56;
           y = 160;
           width = 100;
           height = 25;
           layout = LAYOUT_VERTICAL ;
           margin = 10;     # box内のマージン
           layoutMargin = 10 ;
           layoutSpacing = 10;
           NumberEdit11[0].Value = 40 ;
           NumberEdit11[1].Value = 80;
   }

   Button Button1 {
           x = 184;
           y = 168;
           width = 69;
           height = 28;
           Title = "ScrollBar";

           Function OnTouch( e ) {
                   ^.EditBox12.scrollBarSize = ^.NumberEdit11[0].Value ;
           }
   }
   Button Button2 {
           x = 184;
           y = 200;
           width = 69;
           height = 28;
           Title = "height ";

           Function OnTouch( e ) {
                   ^.EditBox12.height = ^.NumberEdit11[1].Value ;
           }
   }
}