327607_es-ES

liliconcom

Necesita una variable local para cerrar la ventana

Estoy tratando de generar varias ventanas y hacer que el botón de cierre cierre cada una por separado.Sin embargo, no está funcionando como esperaba.Intente ejecutar código 2x; el botón de cierre funciona para una ventana pero no para la otra.

::a = "The quick fox jumped over the brown log";
::b = "Hello World I want to get off now";

names default to here(1);
nw = new window("Test",
 text box(::a),
 text box(::b),
 button box("Close", nw << close window)
);

GráficosScriptingRe: Necesito variable local para cerrar ventana

Así es como lo manejaría

::a = "The quick fox jumped over the brown log";
::b = "Hello World I want to get off now";

Names Default To Here( 1 );
Eval(
 Substitute(
   Expr(
    __nw__ = New Window( "Test",
     Text Box( ::a ),
     Text Box( ::b ),
     Button Box( "Close", __nw__ << close window )
    )
   ),
  Expr( __nw__ ),
   Parse( "nw" || Char( Random Integer( 1, 999999999 ) ) )
 )
);

Re: Necesito variable local para cerrar ventana

Gracias Jim que funciona.Pero dos preguntas:

1. ¿Por qué funciona el tuyo y no el mío?

2. Parece que está asignando __nw__ a un entero aleatorio, pero ya es "identificador de ventana".¿No anula eso su valor de identificador de ventana?

 

Como pregunta adicional, ¿por qué todos los guiones bajos dobles?El código funciona bien sin ellos.