TabFrame/TabForm

Q2
TabFrameのタブの耳の色

A2
[解決方法]
TabFrameのタブの耳の色はオブジェクトの標準色以外には変更できません。また、この標準色は機種によって異なります。
タブの耳の色を変えたい場合は耳の部分を色が変更可能なLabelやImageButtonなどを利用することで代用します。

ここではImageButtonを例に説明します。
TabFrameのTabStyleプロパティを$NONEに設定し、タブの耳を非表示にします。
そして、TabFormの数分のImageButtonを配置し、OnTouchイベントでTabFrameのValueプロパティを変更するように定義すると、ImageButton押下でアクティブなTabFormを切り替えることができます。


[サンプルコード]


水色とピンクのタブのタブフォームサンプル
Form Form1 {
	X = 0;
	Y = 0;
	Width = 234;
	Height = 278;
	TabFrame TabFrame1 {
		X = 20;
		Y = 33;
		Width = 190;
		Height = 156;
		TabStyle = $NONE;
		Border = $FALSE;
		TabForm TabForm1 {
			BgColor = $CCCCFF;
		}
		TabForm TabForm2 {
			BgColor = $FFCCFF;
		};
	}
	ImageButton ImageButton1 {
		X = 20;
		Y = 9;
		Width = 71;
		Height = 24;
		BgColor = ^.TabFrame1.TabForm1.BgColor;
		ButtonStyle = $SURFACE;
		Function OnTouch(e) {
			^.TabFrame1.Value = 0;
		}
	}
	ImageButton ImageButton2 {
		X = ^.ImageButton1.X + ^.ImageButton1.Width + 3;
		Y = 9;
		Width = 71;
		Height = 24;
		BgColor = ^.TabFrame1.TabForm2.BgColor;
		ButtonStyle = $SURFACE;
		Function OnTouch(e) {
			^.TabFrame1.Value = 1;
		}
	}
}
管理番号:BMP_R006
 
  Biz-Collections Bizの宝箱 トップへ
  Biz/Browser Mobile・Biz/Designer Mobile TIPS集 トップへ