SET WINDOW TITLE

versión 6.0 (Modificado)

SET WINDOW TITLE (titulo{; ventana})

El comando SET WINDOW TITLE cambia el título de la ventana cuyo número de referencia se pasa en ventana para el texto pasado en titulo (longitud máxima 80 caracteres).

Si la ventana no existe, SET WINDOW TITLE no hace nada.

Si omite el parámetro ventana, SET WINDOW TITLE reemplaza el título de la ventana del primer plano del proceso actual.

Nota: En el entorno Diseño, 4D define automáticamente los títulos de las ventanas — por ejemplo, "Entrada para tabla 1" cuando realiza una entrada de datos. Si cambia un título de ventana, es probable que 4D lo sobrescriba. Por otra parte, en el entorno Aplicación, 4D no cambia los títulos de las ventanas.

Mientras efectúa una entrada de datos en un formulario, usted hace clic en un botón que ejecuta una operación larga (por ejemplo, una modificación por programación de los registros relacionados mostrados en un subformulario). Puede mantenerse informado sobre el progreso de la operación utilizando el título de la ventana actual:

      ` Método de objeto del botón bAnalisis  
   Case of
      : (Form event=On Clicked)
            ` Guardar el título actual de la ventana en una variable
         $vsTituloActual:=Get window title
            ` Iniciar la operación larga
         FIRST RECORD([Lineas factura])
         For($vlRegistro;1;Records in selection([Lineas factura]))
            HACER ALGO
               ` Mostrar el progreso
            SET WINDOW TITLE

("Procesando la línea #"+String($vlRegistro))
         End for
            ` Restaurar el título original de la ventana
         SET WINDOW TITLE ($vsTituloActual)
   End case

Get window title.