AYUDA EN LÍNEA
 WINDEVWEBDEV Y WINDEV MOBILE

Este contenido se ha traducido automáticamente.  Haga clic aquí  para ver la versión en inglés.
Ayuda / WLanguage / Funciones WLanguage / Controles, páginas y ventanas / Funciones de controles
  • Controles que se tienen en cuenta
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReportes y ConsultasCódigo de Usuario (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Código Navegador
WINDEV Mobile
AndroidWidget Android iPhone/iPadIOS WidgetApple WatchMac CatalystUniversal Windows 10 App
Otros
Procedimientos almacenados
Comprueba la existencia de un control (o grupo de control s) en una ventana, en una página o en un reporte.
Ejemplo
// Check the existence of the "EditName" control
ResExist = ControlExist("EditName")
Sintaxis
<Result> = ControlExist(<Control name>)
<Result>: booleano
  • True si el control (o grupo de control s) existe,
  • False en caso contrario.
<Control name>: Cadena de caracteres
Nombre del control que debe ser marcado entre comillas. Este parámetro también puede corresponder a un grupo de controles.
Para comprobar la existencia de control s en otras ventanas, páginas o informes, <Nombre de control> debe tener el siguiente formato:
"<Nombre de la ventana, página o Reporte>.<Nombre de control>".
Observaciones

Controles que se tienen en cuenta

  • AndroidWidget Android Las opciones del menú no se consideran controles.
Componente: wd290vm.dll
Versión mínima requerida
  • Versión 9
Esta página también está disponible para…
Comentarios
PROCEDURE evento_lista_objetos_gpw(ninstancia)
//variaiveis auxiliares
i is int = 1
objs_form is string = ""
sControlName is string = ""
sControles is string = ""

ninstancia = ninstancia

<COMPILE IF Configuration<>"iOS application" AND Configuration<> "Android application">

IF ninstancia = 0 THEN

RESULT ""

ELSE

NomeForm is string = m_Tabela[ninstancia].gs_nomeJanela

WHEN EXCEPTION IN

sControlName = gpwEnumControl(NomeForm, i)

LOOP(5000)

// Process the control
Trace(sControlName)

// Next control
i++

sControlName = gpwEnumControl(NomeForm, i)

IF sControlName <> "" AND sControlName <> Null AND sControlName <> 0 AND sControlName <> VK_EREOF THEN
indirection is string = NoSpace(NomeForm) +"."+ NoSpace(sControlName)
IF ControlExist(sControlName) = True
sControles += indirection + "; "
END
ELSE
BREAK
END

END

RESULT sControles

DO
IF ExceptionInfo(errCode) THEN
RESULT sControles
Boller
02 09 2023

Última modificación: 27/05/2022

Señalar un error o enviar una sugerencia | Ayuda local