41185_de-DE

liliconcom

Suchfunktion erstellen

Hallo allerseits

Ein Problem, das ich mit dem Gesicht hatte, ist in meinem Skript für das Textbearbeitungsfeld. Ich hatte einen Satzhinweis für das Textbearbeitungsfeld gesetzt, aber wenn ich das Programm ausführe, funktioniert es nicht.
Kann mir jemand helfen, einen Blick darauf zu werfen?

Vielen Dank.

Ich habe unten ein Skript angehängt:

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 ); 
     )   
     
);