TabViewの研究

https://applescript.web.fc2.com/reference2022/reference_tabView.html

 

新しくTabViewを作る(TabViewItemが２つあるタイプ)

set theRect to current application's NSMakeRect(50, 70, 400, 320) set tabView1 to current application's class "NSTabView"'s alloc()'s initWithFrame:theRect theWindow's contentView()'s addSubview:tabView1 -- set tabViewItem1 to current application's class "NSTabViewItem"'s alloc's initWithIdentifier:"tab1" tabViewItem1's setLabel:"タブ1" tabView1's addTabViewItem:tabViewItem1 -- set tabViewItem2 to current application's class "NSTabViewItem"'s alloc's initWithIdentifier:"tab2" tabViewItem2's setLabel:"タブ2" tabView1's addTabViewItem:tabViewItem2

 

・通常タイプのTabView表示なら

tell tabView1 setTabViewType_(current application's NSTopTabsBezelBorder) end tell

 

TabViewタイプの"NSTopTabsBezelBorder"の部分を下記に変更すると

 

 

・NSBottomTabsBezelBorder

　（下に付く）

  

 

・NSLeftTabsBezelBorder

　（左に付く）

 

 

・NSRightTabsBezelBorder

　（右に付く）

 

 

・NSNoTabsBezelBorder

　（ベゼルな枠だけ残る）え？タブの意味はどこへいったの？

 

 

・NSNoTabsLineBorder

　（枠線だけ残る）ええぇ！？タブの意味...(省略)

 

 

・NSNoTabsNoBorder

　（枠線すら無い）はぁ？タブビューですら...(省略)

  

  

タブビューアイテムの追加（一番後ろ）

addTabViewItem_(theTabViewItem)

 

タブビューアイテムの挿入（0が一番前で、あとは数字ぶんのタブの後ろに挿入される） 

set aIndexNo to 1 insertTabViewItem_atIndex_(theTabViewItem, aIndexNo)

 

アイテムに該当するタブを削除

removeTabViewItem:theTabViewItem

 

指定番号のタブを削除(一番前は0)

set aIndexNo to 1 tabView1's removeTabViewItem:(tabView1's tabViewItemAtIndex:aIndexNo)

 　（あれ？一度アイテムを呼び出さないといけない、この方法しかないのかなぁ？）

 

前のタブを選択

selectPreviousTabViewItem:me

 

次のタブを選択

selectNextTabViewItem:me

 

指定された番号のタブを選択

set aIndexNo to 1 selectTabViewItemAtIndex:aIndexNo

 

指定された識別子のタブを選択

selectTabViewItemWithIdentifier:"tab2"

 

選択されているタブのタイトル(label)を取得

set aTitle to ({} & ((tabView1's selectedTabViewItem())'s label())) as text

　 ※ 変な方法で求めています。

 

選択されたタブのインデックス（番号）を取得

set aIndex to tabView1's indexOfTabViewItem:(tabView1's selectedTabViewItem())

 

タブの表示フォントを変更する

tabView1's setFont:(current application's class "NSFont"'s fontWithName:"HiraMinProN-W6" |size|:24.0)

 　 ※ ちなみにフォント名はFont Book.appでフォントの情報から『PostScript名』を参考に

タブビューアイテムにオブジェクトを配置する(例はtextField1というオブジェクトを貼り付けている)

tabViewItem1's view()'s addSubview_(textField1)

 　 ※ タブビューアイテムのビューの上に貼り付ける指示をしなければならない

 

などなど。