Este es el sitio web histórico de la documentación de 4D. La documentación se está trasladando progresivamente a developer.4d.com |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v20 R7
Current form name
|
Current form name -> Resultado | ||||||||
Parámetro | Tipo | Descripción | ||||||
Resultado | Texto |
![]() |
Nombre del formulario de proyecto actual o formulario tabla actual en el proceso | |||||
El comando Current form name devuelve el nombre del formulario actual definido para el proceso. El formulario actual puede ser un formulario proyecto o un formulario tabla.
Por defecto, si no se ha llamado al comando FORM LOAD en el proceso actual, el formulario actual es el que está siendo visualizado o impreso. Si ha llamado al comando FORM LOAD en el proceso, el formulario actual es el definido para este comando y permanece así hasta que llame a FORM UNLOAD (o CLOSE PRINTING JOB).
El comando devuelve:
En un formulario de entrada, ponga el siguiente código en un bóton:
C_TEXT($FormName)
$win:=Open form window([Members];"Input";Plain form window)
DIALOG([Members];"Input")
$FormName:=Current form name
// $FormName = "Input"
FORM LOAD([Members];"Drag")
$FormName:=Current form name
// $FormName = "Drag"
//...
Usted quiere obtener el formulario actual si éste es un formulario proyecto:
$PointerTable:=Current form table
If(Nil($PointerTable)) // este es un formulario proyecto
$FormName:=Current form name
... // procesamiento
End if
Producto: 4D
Tema: Formularios
Número
1298
Creado por: 4D v14
Manual de lenguaje 4D ( 4D v20 R7)