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

    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