<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Encuentro que el ancho de los cuadros de lista en la GUI 'concatenar tablas' es demasiado estrecho para los nombres de mis tablas, que son muy largos. Este script los amplía utilizando la función de ancho de conjunto, argumento en píxeles. Es posible que deba modificarse el 500 en la función Mín. () Según la resolución de la pantalla, pero funciona para mí. Otras GUI pueden beneficiarse de algo similar, pero utilizo concatenar varios órdenes de magnitud más a menudo que otros manipuladores de plataformas de mesa como join. Utilice la función 'Mostrar estructura de árbol' y modifíquela según sea necesario.
Por cierto me pareció extraño el "cuadro de lista". Por lo general, es sólo "cuadro de lista". Eso me lanzó por un bucle por un tiempo hasta que lo noté.
nueva mesa ( "La mayoría de mis tablas de datos tienen nombres de archivos absurdamente largos pero extraordinariamente descriptivos" ) ; // cuando ejecuté esta prueba todavía tenía otras 3 tablas abiertas con nombres más largos; maxLen = 85 caracteres.
// el script real comienza aquí
dt = tabla de datos actual () ;
maxLen = 20 ;
para ( yo = 1 , yo <= Mesa n () , yo ++,
nombreLen = tabla de datos ( yo ) << obtener nombre ;
Si ( longitud ( nombreLen ) > maxLen ,
maxLen = longitud ( nombreLen ) ;
) ;
) ;
dt << concatenar () ;
// espera (0);
myWin = ventana ( "Concatenar" ) ;
Espere ( 0 ) ;
myRef = myWin El Cuadro de lista ( 1 )] ; //
myRef << establecer ancho ( min ( 500 , maxLen * 6 )) ; // ancho en píxeles, el * 6 parecía correcto.
myRef = myWin El Cuadro de lista ( 2 )] ; //
myRef << establecer ancho ( min ( 500 , maxLen * 6 )) ;
