218322_it-IT

liliconcom

Come impostare il nome di una casella di testo come variabile?

Ciao,

Voglio che la nuova finestra abbia alcune schede su ogni scheda che avrà una casella di testo da cui ottengo un valore per la scheda corrispondente.
Attualmente nel programma ho scritto tutte le caselle di testo con lo stesso nome e quindi il valore si ottiene dalla casella di testo nell'ultima scheda.
Come definisco il nome della casella di testo come variabile?

Questo è il codice che ho scritto -

 

Chart_func = function( {Layer},
vlistbox(Outline Box(Layer),
H List Box( Text Box( "enter NEW CL: " ), theBinNumber = Number Edit Box() ),
Button Box( "OK", NEW_CL = theBinNumber << get)
));

MTK72Mon_TAB = Tab Box(
 "  TIN_LD  ", Chart_func("TIN_LD"),
 "  TIN_HD  ", Chart_func("TIN_HD"),
 "  CU 225A  ", Chart_func("CU_225A"),
 ); 

MTK72_Mon_charts = new window ("MTK72 Mon",hlistbox("Title"), MTK72Mon_TAB);

Ri: Come impostare il nome di una casella di testo come variabile?

È necessario fornire un puntatore univoco a ciascuno degli elementi in ciascuna delle schede.  Di seguito è riportato un modo per farlo

counter = 0;

Chart_func = function( {Layer},
counter++;
eval(Substitute(
  Expr(
   V List Box(
    Outline Box( Layer ),
    H List Box( Text Box( "enter NEW CL: " ), __theBinNumber__ = Number Edit Box() ),
    Button Box( "OK", __NEW_CL__ = __theBinNumber__ << get )
   )
  ),
 Expr( __theBinNumber__ ), Parse( "theBinNumber" || Char( counter ) ),
 Expr( __NEW_CL__ ), Parse( "NEW_CL" || Char( counter ) )
))
);

MTK72Mon_TAB = Tab Box(
 "  TIN_LD  ", Chart_func("TIN_LD"),
 "  TIN_HD  ", Chart_func("TIN_HD"),
 "  CU 225A  ", Chart_func("CU_225A"),
 ); 

MTK72_Mon_charts = new window ("MTK72 Mon",hlistbox("Title"), MTK72Mon_TAB);

Ri: Come impostare il nome di una casella di testo come variabile?

Grazie mille, mi hai davvero aiutato !!!