どのように動的にあなたはそうのようなタブ・パネルを持っているとしましょうレッド

Question

でタブパネルに新しいタブを追加することができます。

それは持っているので、私は動的にそれに新しいタブを追加することができますどのように

editor: layout [ 
    below 
    t: tab-panel 350x350 [ 
     "tab 1" [ 
      below 
      b: button 75x25 "Interpret" on-click [do a/text ] 
      a: area 320x250 
     ] 
    ] 
] 

view editor 

現在のタブの内容ですか？

Answer 1

彼らは動的に新しいタブを追加する方法はいくつかありますが、すべての場合には、それが追加に沸く：

• タブのラベルをstring!t/dataにブロックとして。
• A対応panel顔object!〜t/paneブロック。

  tab1: [ 
      below 
      button 75x25 "Interpret" on-click [do face/parent/pane/2/text ] 
      area 320x250 
  ] 
  
  editor: layout compose/deep/only [ 
      below 
      button "add tab" [ 
       append t/data "tab 2" 
       append t/pane make face! [type: 'panel pane: layout/only tab1] 
      ] 
      t: tab-panel 350x350 ["tab 1" (tab1)] 
  ] 
  view editor 
  

  いくつかの発言：

はここで完全に動作するサンプルコードであるごとに（その定義は、他のタブの内容のために再利用できるように

• tab1定義は、外部化されたあなたの要求）。
• a:単語が重複しないため削除されました。現在、現在のタブパネルの現在のarea顔へのアクセスは、顔のツリーを歩いて行われます。 b:の定義が同じ理由で削除されています（とにかく使用されていません）。

ダイナミックビヘイビアとダイナミックフェイス構築（VIDダイアレクトなし）の例はhereです。 tab-panel顔タイプが記載されている。there。