In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

error tcombox

Foro de Xailer profesional en español
Responder
PILO
Mensajes: 583
Registrado: Vie Jul 06, 2007 5:18 pm

error tcombox

Mensaje por PILO »

Hola cuando ejecuto el proceso de onchage de un
tcombox me da el siguiente error sin nada dentro de el
FCONTROLES:TIPOCONTROLCHANGE(0)
Error BASE/1004 Scope Violation <HIDDEN>: TIPOCONTROLCHANGE
Argumentos: ()
***************************** Registro de errores
*****************************
Fecha: 25-06-2007
Hora: 14:59:18
Memoria libre: 401796
Area actual: 1
------------------------- Información del
compilador --------------------------
Versión Xailer: Xailer 1.5.0 Version 1.5
Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del
error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: TIPOCONTROLCHANGE
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
TIPOCONTROLCHANGE (0)
TCOMBOBOX:ONCHANGE (0)
TCOMBOBOX:CHANGE (444)
TCOMBOBOX:COMMAND (242)
TSCROLLINGWINCONTROL:WMCOMMAND (253)
TFCONTROLES:WMCOMMAND (885)
TFCONTROLES:SHOWMODAL (0)
TMENUSRMPILO:MCOFGENCONTROLES (988)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (231)
TMENU:DOACTION (236)
TMENU:DOACTION (236)
TMENUSRMPILO:WMCOMMAND (878)
RUNFORM (0)
TAPPLICATION:RUN (209)
MAIN (29)
------------------ Información detallada de áreas de
trabajo ------------------
Area: 1
Alias: CONTROLES
Registro: 1
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
Arriba
PILO
Mensajes: 583
Registrado: Vie Jul 06, 2007 5:18 pm

error tcombox

Mensaje por PILO »

Tambien me pasa cuando lo doy el boton aceptar y salta al evento de 1click
con una dataset abierto y un indice cdx
Arriba
PILO
Mensajes: 583
Registrado: Vie Jul 06, 2007 5:18 pm

error tcombox

Mensaje por PILO »

Este es el formulario
#include "Xailer.ch"
#include "srmlibro.ch"
#include "fileio.ch" // para el control de archivos de ms dos
#define CRTLF CHR(13)+ CHR(10)
CLASS TFControles FROM TForm
COMPONENT oLabel1
COMPONENT oTIPOCONTROL
COMPONENT oLabel2
COMPONENT oCONTROLA
COMPONENT oETI1
COMPONENT oETI2
COMPONENT oETI3
COMPONENT oETI4
COMPONENT oETI5
COMPONENT oETI6
COMPONENT oETI7
COMPONENT oETI8
COMPONENT oETI9
COMPONENT oETI10
COMPONENT oPedir1
COMPONENT oPedir2
COMPONENT oPedir3
COMPONENT oPedir4
COMPONENT oPedir5
COMPONENT oPedir6
COMPONENT oPedir7
COMPONENT oPedir8
COMPONENT oPedir9
COMPONENT oPedir10
COMPONENT oAcepta
COMPONENT oCancelar
COMPONENT oCdxRcamino
COMPONENT oDbfControles
PRIVATE:
DATA MATRIZCONTROLES
METHOD CreateForm()
METHOD FormInitialize( oSender )
METHOD FormCreate( oSender )
METHOD FormShow( oSender )
METHOD AceptaClick( oSender )
METHOD TIPOCONTROLChange( oSender, nIndex, nOldIndex )
ENDCLASS
#include "FControles.xfm"
//---------------------------------------------------------- --------------------
METHOD FormInitialize( oSender ) CLASS TFControles
::oCdxRcamino:cConnect() := RCAMINO
::oDbfControles:cName() := "controles.DBF"
::oDbfControles:Open()
::oDbfControles:reindex()
::oDbfControles:OrdSetFocus("NOMBRE")
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD FormCreate( oSender ) CLASS TFControles
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD FormShow( oSender ) CLASS TFControles
LOCAL XCONTROLES, NNPRIMERO, NNFINAL, NNCOMA, NNANTES, NNMATRIZ := 1
MATRIZCONTROLES := {NIL}
If !::oDbfControles:LOpen
::oDbfControles:Open()
end if
::oDbfControles:Select()
::oDbfControles:OrdSetFocus("Nombre")
if ::oDbfControles:SEEK("HOJALIBRO")
/*::oDbfControles:fastedit()
::oDbfControles:DATOSCONT := Str(MatrizControles[1]) + "," +
Str(MatrizControles[2])
::oDbfControles:fastupdate()
*/
XCONTROLES := RTRIM(::oDBFControles:DatosCont)
NNPRIMERO := AT("{",XCONTROLES)
NNFINAL := AT("}",XCONTROLES)
NNCOMA := AT(",",XCONTROLES,(NNPRIMERO+1))
//MSGINFO(STR(NNFINAL,2,0)+" "+STR(NNPRIMERO,2,0)+ " " +
STR(NNCOMA,2,0))
DO WHILE NNCOMA > 0
IF NNMATRIZ = 1
AIns( MATRIZCONTROLES, NNMATRIZ ,;
SUBSTR(XCONTROLES,NNPRIMERO+1, NNCOMA-(NNPRIMERO+1)))
NNMATRIZ = NNMATRIZ + 1
NNANTES := NNCOMA
NNCOMA := AT(",",XCONTROLES,(NNCOMA+1))
IF NNCOMA = 0
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNFINAL-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
END IF
ELSE
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNCOMA-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
NNANTES := NNCOMA
NNCOMA := AT(",",XCONTROLES,(NNCOMA+1))
IF NNCOMA = 0
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNFINAL-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
END IF
END IF
END WHILE
//MatrizControles := { Token(::oDBFControles:DatosCont, 1),
Token(::oDBFControles:DatosCont, 2) }
::oPedir1:Value := MATRIZCONTROLES[1]
::oPedir1:cPicture := "9999"
::oPedir1:lVisible := .t.
::oETI1:cText := "Comienza Hoja:"
::oETI1:lVisible := .t.
::oPedir2:Value := MATRIZCONTROLES[2]
::oPedir2:cPicture := "99"
::oPedir2:lVisible := .t.
::oETI2:cText := "Comienza linea:"
::oETI2:lVisible := .t.
//MSGINFO(MATRIZCONTROLES)
else
msginfo("No encontrado hojalibro en controles")
end if
::oDbfControles:Select()
::oDbfControles:OrdSetFocus("Nombre")
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD AceptaClick( oSender ) CLASS TFControles
LOCAL XGUARDAR
MSGINFO("ACEPTA")
if ::oDbfControles:NOMCONTROL = "HOJALIBRO"
::oDbfControles:FASTEDIT()
XGUARDAR := "{"
XGUARDAR := XGUARDAR + ::oPedir1:Value
XGUARDAR := XGUARDAR + ","
XGUARDAR := XGUARDAR + ::oPedir2:Value
XGUARDAR := XGUARDAR + "}"
::oDbfControles:DATOSCONT := XGUARDAR
::oDbfControles:FASTUPDATE()
END IF
if ::oDbfControles:NOMCONTROL = "HOJAMEDICA"
::oDbfControles:FASTEDIT()
XGUARDAR := "{"
XGUARDAR := XGUARDAR + ::oPedir1:Value
XGUARDAR := XGUARDAR + ","
XGUARDAR := XGUARDAR + ::oPedir2:Value
XGUARDAR := XGUARDAR + "}"
::oDbfControles:DATOSCONT := XGUARDAR
::oDbfControles:FASTUPDATE()
END IF
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD TIPOCONTROLChange( oSender, nIndex, nOldIndex ) CLASS TFControles
LOCAL XCONTROLES, NNPRIMERO, NNFINAL, NNCOMA, NNANTES, NNMATRIZ := 1
MATRIZCONTROLES := {NIL}
If !::oDbfControles:LOpen
::oDbfControles:Open()
end if
::oDbfControles:Select()
::oDbfControles:OrdSetFocus("Nombre")
if RTRIM(::oTIPOCONTROL:cTEXT) = "HOJA LIBRO"
::oDbfControles:SEEK("HOJALIBRO")
XCONTROLES := RTRIM(::oDBFControles:DatosCont)
NNPRIMERO := AT("{",XCONTROLES)
NNFINAL := AT("}",XCONTROLES)
NNCOMA := AT(",",XCONTROLES,(NNPRIMERO+1))
//MSGINFO(STR(NNFINAL,2,0)+" "+STR(NNPRIMERO,2,0)+ " " +
STR(NNCOMA,2,0))
DO WHILE NNCOMA > 0
IF NNMATRIZ = 1
AIns( MATRIZCONTROLES, NNMATRIZ ,;
SUBSTR(XCONTROLES,NNPRIMERO+1, NNCOMA-(NNPRIMERO+1)))
NNMATRIZ = NNMATRIZ + 1
NNANTES := NNCOMA
NNCOMA := AT(",",XCONTROLES,(NNCOMA+1))
IF NNCOMA = 0
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNFINAL-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
END IF
ELSE
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNCOMA-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
NNANTES := NNCOMA
NNCOMA := AT(",",XCONTROLES,(NNCOMA+1))
IF NNCOMA = 0
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNFINAL-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
END IF
END IF
END WHILE
//MatrizControles := { Token(::oDBFControles:DatosCont, 1),
Token(::oDBFControles:DatosCont, 2) }
::oPedir1:Value := MATRIZCONTROLES[1]
::oPedir1:cPicture := "9999"
::oPedir1:lVisible := .t.
::oETI1:cText := "Comienza Hoja:"
::oETI1:lVisible := .t.
::oPedir2:Value := MATRIZCONTROLES[2]
::oPedir2:cPicture := "99"
::oPedir2:lVisible := .t.
::oETI2:cText := "Comienza linea:"
::oETI2:lVisible := .t.
//MSGINFO(MATRIZCONTROLES)
end if
if RTRIM(::oTIPOCONTROL:cTEXT) = "HOJA MEDICAMENTO"
MSGINFO(" 1")
::oDbfControles:SEEK("HOJAMEDICA")
XCONTROLES := RTRIM(::oDBFControles:DatosCont)
NNPRIMERO := AT("{",XCONTROLES)
NNFINAL := AT("}",XCONTROLES)
NNCOMA := AT(",",XCONTROLES,(NNPRIMERO+1))
//MSGINFO(STR(NNFINAL,2,0)+" "+STR(NNPRIMERO,2,0)+ " " +
STR(NNCOMA,2,0))
DO WHILE NNCOMA > 0
MSGINFO(" 2")
IF NNMATRIZ = 1
AIns( MATRIZCONTROLES, NNMATRIZ ,;
SUBSTR(XCONTROLES,NNPRIMERO+1, NNCOMA-(NNPRIMERO+1)))
NNMATRIZ = NNMATRIZ + 1
NNANTES := NNCOMA
NNCOMA := AT(",",XCONTROLES,(NNCOMA+1))
IF NNCOMA = 0
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNFINAL-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
END IF
MSGINFO(" 3")
ELSE
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNCOMA-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
NNANTES := NNCOMA
NNCOMA := AT(",",XCONTROLES,(NNCOMA+1))
IF NNCOMA = 0
AADD( MATRIZCONTROLES, SUBSTR(XCONTROLES,NNANTES+1,
NNFINAL-(NNANTES+1)))
NNMATRIZ = NNMATRIZ + 1
END IF
MSGINFO(" 4")
END IF
END WHILE
//MatrizControles := { Token(::oDBFControles:DatosCont, 1),
Token(::oDBFControles:DatosCont, 2) }
MSGINFO(" 5")
::oPedir1:Value := MATRIZCONTROLES[1]
::oPedir1:cPicture := "9999"
::oPedir1:lVisible := .t.
::oETI1:cText := "Comienza Hoja:"
::oETI1:lVisible := .t.
MSGINFO(" 6")
::oPedir2:Value := MATRIZCONTROLES[2]
::oPedir2:cPicture := "99"
::oPedir2:lVisible := .t.
::oETI2:cText := "Comienza linea:"
::oETI2:lVisible := .t.
MSGINFO(" 7")
//MSGINFO(MATRIZCONTROLES)
end if
RETURN Nil
//---------------------------------------------------------- --------------------
Arriba
PILO
Mensajes: 583
Registrado: Vie Jul 06, 2007 5:18 pm

error tcombox

Mensaje por PILO »

ESTE ES EL XMF
METHOD CreateForm() CLASS TFControles
Super:CreateForm()
::SetBounds( 338, 176, 603, 448 )
::SetClientSize( 595, 421 )
::cText := "FControles"
::oFont := TFont():Create( "MS Sans Serif", 14, 0, 400 )
::lCentered := .T.
::OnInitialize := "FormInitialize"
::OnCreate := "FormCreate"
::OnShow := "FormShow"
::Create()
WITH OBJECT ::oCdxRcamino := TCdxDataSource():New( Self )
:cConnect := "c:srmpiloganado"
:Create()
END
WITH OBJECT ::oDbfControles := TDbfDataSet():New( Self )
:cName := "controles.Dbf"
:oDataSource := ::oCdxRcamino
:cProcess := "GENERAL"
:Create()
END
WITH OBJECT ::oLabel1 := TLabel():New( Self )
:SetBounds( 22, 10, 465, 30 )
:cText := "CONTROLAR DATOS DEL PROGRAMA"
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 18, 0, 700 )
:nClrText := clRed
:Create()
END
WITH OBJECT ::oTIPOCONTROL := TCombobox():New( Self )
:SetBounds( 176, 44, 204, 32 )
:cText := "HOJA LIBRO"
:aItems := { "HOJA LIBRO", "HOJA MEDICAMENTO" }
:nIndex := 1
:OnChange := "TIPOCONTROLChange"
:Create()
END
WITH OBJECT ::oLabel2 := TLabel():New( Self )
:SetBounds( 36, 46, 135, 25 )
:cText := "CONTROLAR:"
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 14, 0, 700 )
:Create()
END
WITH OBJECT ::oCONTROLA := TGroupBox():New( Self )
:SetBounds( 12, 84, 542, 282 )
:cText := "Hoja Libro"
:Create()
END
WITH OBJECT ::oETI1 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 30, 128, 25 )
:cText := "Comienzo hoja"
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI2 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 54, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI3 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 80, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI4 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 104, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI5 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 128, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI6 := TLabel():New( ::oCONTROLA )
:SetBounds( 24, 154, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI7 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 178, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI8 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 206, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI9 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 230, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oETI10 := TLabel():New( ::oCONTROLA )
:SetBounds( 25, 250, 138, 25 )
:cText := "Comienzo Linea"
:lVisible := .F.
:nAlignment := taRIGHT
:Create()
END
WITH OBJECT ::oPedir1 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 34, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:Create()
END
WITH OBJECT ::oPedir2 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 58, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir3 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 82, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir4 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 106, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir5 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 130, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir6 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 154, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir7 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 178, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir8 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 202, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir9 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 226, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oPedir10 := TMaskEdit():New( ::oCONTROLA )
:SetBounds( 302, 250, 120, 20 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:lVisible := .F.
:Create()
END
WITH OBJECT ::oAcepta := TBtnBmp():New( Self )
:SetBounds( 16, 374, 126, 30 )
:cText := "&Acepta"
:nModalResult := mrOK
:oBitmaps := "bmp_BOK"
:OnClick := "AceptaClick"
:Create()
END
WITH OBJECT ::oCancelar := TBtnBmp():New( Self )
:SetBounds( 144, 374, 126, 30 )
:cText := "&Cancelar"
:nModalResult := mrCANCEL
:oBitmaps := "bmp_CANCEL"
:Create()
END
RETURN Self
Arriba
PILO
Mensajes: 583
Registrado: Vie Jul 06, 2007 5:18 pm

error tcombox

Mensaje por PILO »

Esta es la dbf utilizada


Attached files CONTROLES.cdx (3 KB)Â CONTROLES.DBF (341 B)Â
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9457
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

error tcombox

Mensaje por ignacio »

Pilo,
Mandenos un pequeño ejemplo que reproduzca el error, o bien indiquenos como
reproducirlo con cualquier ejemplo de Xailer. Le recuerdo que hay un ejemplo
solo de Combos. Le ruego que no nos mande código de sus propios proyectos.
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"PILO" <srmpilo@hotmail.com> escribió en el mensaje
news:467fbcb4$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Hola cuando ejecuto el proceso de onchage de un
> tcombox me da el siguiente error sin nada dentro de el
>
> FCONTROLES:TIPOCONTROLCHANGE(0)
> Error BASE/1004 Scope Violation <HIDDEN>: TIPOCONTROLCHANGE
> Argumentos: ()
>
> ***************************** Registro de errores
> *****************************
>
> Fecha: 25-06-2007
> Hora: 14:59:18
> Memoria libre: 401796
> Area actual: 1
>
> ------------------------- Información del
> compilador --------------------------
>
> Versión Xailer: Xailer 1.5.0 Version 1.5
> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
> Compilador C/C++: Borland C++ 5.5.1
> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>
> ----------------------- Información detallada del
> error -----------------------
>
> Subsistema: BASE
> Código de error: 1004
> Estado: .F.
> Descripción: Scope Violation <HIDDEN>
> Operación: TIPOCONTROLCHANGE
> Argumentos:
> Fichero:
> Código error SO: 0
>
> Pila de llamadas:
> TIPOCONTROLCHANGE (0)
> TCOMBOBOX:ONCHANGE (0)
> TCOMBOBOX:CHANGE (444)
> TCOMBOBOX:COMMAND (242)
> TSCROLLINGWINCONTROL:WMCOMMAND (253)
> TFCONTROLES:WMCOMMAND (885)
> TFCONTROLES:SHOWMODAL (0)
> TMENUSRMPILO:MCOFGENCONTROLES (988)
> TMENUITEM:ONCLICK (0)
> TMENU:DOACTION (231)
> TMENU:DOACTION (236)
> TMENU:DOACTION (236)
> TMENUSRMPILO:WMCOMMAND (878)
> RUNFORM (0)
> TAPPLICATION:RUN (209)
> MAIN (29)
>
> ------------------ Información detallada de áreas de
> trabajo ------------------
>
> Area: 1
> Alias: CONTROLES
> Registro: 1
> Filtro:
> Relación:
> Orden del índice: 1
> Clave activa: 1
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
Responder

Volver a “Xailer Pro Spanish”