41185_zh-TW

liliconcom

創建搜索功能

嗨，大家好

我面臨的一個問題是在我的文本編輯框的腳本中，我已經為文本編輯框設置了提示，但是當我運行程序時，它不起作用。
有誰能幫我看看？

謝謝。

我附上以下腳本：

nw = New Window("SB Selection",
 << modal,

 V List box (
   // " ",
   // "Select SB of Interest",
   // " ",
    Line up box(1, "SB:", SB = SBList ),
    //" ",
    
     Lineup box (Ncol(1),
     aa = List Box(SBList),
     ted = Text Edit Box(" ", << Set Hint("search word example: I"),
     << Set Script(
      Wrd = Uppercase(ted << Get Text);
      SBListNew = {};
      For(j = 1, j<= N Items(SBList), j++,
       if (Contains(SBList[j], Wrd),
        Insert Into(SBListNew, SBList[j])
       )
      );
      
     aa << Set items(SBListNew);
      
                 )  
                 
                )
            ),
            
    Panel Box("Select",
    rb = Radio Box(u1u2)
 
 ),
   H List box( Button Box( "OK" ), Button Box( "Cancel" ) ),

         )

    );   
       
  If( nw["Button"] == -1,
   Throw( "User Cancel" )
  );
  Remove From( nw );
  Eval List( nw );
  
  B = SBList[SB];
  
  Include( JSL ); 
     )   
     
);