218322_es-ES

liliconcom

¿Cómo establecer el nombre de un cuadro de texto como una variable?

Hola,

Quiero que la nueva ventana tenga algunas pestañas en cada pestaña que tengan un cuadro de texto del cual obtengo un valor para la pestaña correspondiente.
Actualmente, en el programa escribí todos los cuadros de texto del mismo nombre y, por lo tanto, el valor se obtiene del cuadro de texto en la última pestaña.
¿Cómo defino el nombre del cuadro de texto como una variable?

Este es el código que escribí

 

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

Re: ¿Cómo establecer el nombre de un cuadro de texto como una variable?

Debe proporcionar un puntero único a cada uno de los elementos en cada uno de los cuadros de pestañas.  A continuación hay una forma de hacerlo.

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

Re: ¿Cómo establecer el nombre de un cuadro de texto como una variable?

Muchas gracias, realmente me ayudaste !!!