TabSetの使い方

TabSetはTabControlのタブ部分を取り出したようなコントロールです。タブをクリックするとそのタブの色が変わって選ばれます。

タブを追加するには

1. オブジェクトインスペクタでTabsプロパティを選んでプロパティエディタを開きます。
2. プロパティエディタでタブのタイトルを入力します。1行が１つのタブに対応します。
3. プロパティエディタを閉じるとタブが追加されます。

タブの選択状態に反応するには

タブがクリックされたときにTabIndexを読み取ると、タブの変化を得ることができます。

例

procedure TForm1.TabSet1Click(Sender: TObject);
begin
 case TabSet1.TabIndex of
    0:  lblTab.Caption := 'Tab1 Selected';
    1:  lblTab.Caption := 'Tab2 Selected';
    2:  lblTab.Caption := 'Tab3 Selected';
 end;
end;