Xailer & OZ Software

Alguien me puede explicar como puedo cambiar el titulo de un Form despues de
cerrar otro al volver
al que le ha llamado
Gracias De antemano

Pilo,
Prueba con
::cText := "Nuevo título"
Saludos,
José Luis Capel
"PILO" <srmpilo@hotmail.com> escribió en el mensaje
news:4570354d$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Alguien me puede explicar como puedo cambiar el titulo de un Form despues
> de cerrar otro al volver
> al que le ha llamado
> Gracias De antemano
>

Muchas Gracias jose, lo habia intentado eso

Pilo,
> Muchas Gracias jose, lo habia intentado eso
¿Como lo has hecho y no te ha salido? ¿Puedes mostrarnos algo de ese
código?
Saludos,
José Luis Capel

Perdon funciona bien,
Otra pregunta, como puedo actualizar los mismos pero desde una ventana hija
sin salir de dicha ventana
"José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
news:[email=4570425c@news.xailer.com...]4570425c@news.xailer.com...[/email]
> Pilo,
>
>
>> Muchas Gracias jose, lo habia intentado eso
>
>
> ¿Como lo has hecho y no te ha salido? ¿Puedes mostrarnos algo de ese
> código?
>
> Saludos,
> José Luis Capel
>
>
>

cuando esto en un dbbrowse y pulso doble click
quiero hacer lo siguiente
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
selecionarExplo()
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
//---------------------------------------------------------- --------------------
function SelecionarExplo(oSender)

MSGINFO(::oDbfExplota1:NOMBRE)
TGRUPO_NIF = ::oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = ::oDbfExplota1:ANO // Aí‘O DE TRABAJO
return nil
EN EJECUCION DEL IDE ME DA EL SIGUIENTE ERROR
SELECIONAREXPLO(201)
Error BASE/1003 Variable does not exist: SELF
Argumentos: ()
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1003
Estado: .F.
Descripción: Variable does not exist
Operación: SELF
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
SELECIONAREXPLO (201)
TFEXPLOTA:DBBROWSE1DBLCLICK (193)
TDBBROWSE:ONDBLCLICK (0)
TDBBROWSE:WMLBUTTONDBLCLK (2035)
RUNFORM (0)
TAPPLICATION:RUN (208)
MAIN (20)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: EXPLOTA
Registro: 6
Filtro:
Relación:
Orden del í­ndice: 1
Clave activa: 1
Si lo pongo asi no me da error, pero quiero hacerlo como arriba, me podeis decir como
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
MSGINFO(::oDbfExplota1:NOMBRE)
TGRUPO_NIF = ::oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = ::oDbfExplota1:ANO // Aí‘O DE TRABAJO
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
--

PILO,
::oParent:cText := "Nuevo título"
Un Saludo,
Xevi.
"PILO" <srmpilo@hotmail.com> ha escrit al missatge del grup de discussió:
4570431e$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Perdon funciona bien,
> Otra pregunta, como puedo actualizar los mismos pero desde una ventana
> hija
> sin salir de dicha ventana
>
> "José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
> news:[email=4570425c@news.xailer.com...]4570425c@news.xailer.com...[/email]
>> Pilo,
>>
>>
>>> Muchas Gracias jose, lo habia intentado eso
>>
>>
>> ¿Como lo has hecho y no te ha salido? ¿Puedes mostrarnos algo de ese
>> código?
>>
>> Saludos,
>> José Luis Capel
>>
>>
>>
>
>

PILO
SelecionarExplo... es una función, por lo tanto no puedes acceder a :: o sea self.
Debes enviarle el objeto que quieras trabajar en la función.
Para el caso, creo que te servirá...
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
selecionarExplo(oSender:oParent)
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
function SelecionarExplo(oSender)

MSGINFO(oSender:oDbfExplota1:NOMBRE)
TGRUPO_NIF = oSender:oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = oSender:oDbfExplota1:ANO // Aí‘O DE TRABAJO
return nil
Un saludo,
Xevi.
"PILO" <srmpilo@hotmail.com> ha escrit al missatge del grup de discussió: 4570441f$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
cuando esto en un dbbrowse y pulso doble click
quiero hacer lo siguiente
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
selecionarExplo()
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
//---------------------------------------------------------- --------------------
function SelecionarExplo(oSender)

MSGINFO(::oDbfExplota1:NOMBRE)
TGRUPO_NIF = ::oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = ::oDbfExplota1:ANO // Aí‘O DE TRABAJO
return nil
EN EJECUCION DEL IDE ME DA EL SIGUIENTE ERROR
SELECIONAREXPLO(201)
Error BASE/1003 Variable does not exist: SELF
Argumentos: ()
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1003
Estado: .F.
Descripción: Variable does not exist
Operación: SELF
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
SELECIONAREXPLO (201)
TFEXPLOTA:DBBROWSE1DBLCLICK (193)
TDBBROWSE:ONDBLCLICK (0)
TDBBROWSE:WMLBUTTONDBLCLK (2035)
RUNFORM (0)
TAPPLICATION:RUN (208)
MAIN (20)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: EXPLOTA
Registro: 6
Filtro:
Relación:
Orden del í­ndice: 1
Clave activa: 1
Si lo pongo asi no me da error, pero quiero hacerlo como arriba, me podeis decir como
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
MSGINFO(::oDbfExplota1:NOMBRE)
TGRUPO_NIF = ::oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = ::oDbfExplota1:ANO // Aí‘O DE TRABAJO
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
--

Puedes enviarle igual la variable SELF que hace referencia a la clase, y la usas en tu funcion.
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
selecionarExplo(Self)
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
//---------------------------------------------------------- --------------------
function SelecionarExplo(Self)

MSGINFO(::oDbfExplota1:NOMBRE)
TGRUPO_NIF = ::oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = ::oDbfExplota1:ANO // Aí‘O DE TRABAJO
return nil
Saludos.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/
"PILO" <srmpilo@hotmail.com> escribió en el mensaje news:4570441f$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
cuando esto en un dbbrowse y pulso doble click
quiero hacer lo siguiente
EN EJECUCION DEL IDE ME DA EL SIGUIENTE ERROR
SELECIONAREXPLO(201)
Error BASE/1003 Variable does not exist: SELF
Argumentos: ()
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1003
Estado: .F.
Descripción: Variable does not exist
Operación: SELF
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
SELECIONAREXPLO (201)
TFEXPLOTA:DBBROWSE1DBLCLICK (193)
TDBBROWSE:ONDBLCLICK (0)
TDBBROWSE:WMLBUTTONDBLCLK (2035)
RUNFORM (0)
TAPPLICATION:RUN (208)
MAIN (20)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: EXPLOTA
Registro: 6
Filtro:
Relación:
Orden del í­ndice: 1
Clave activa: 1
Si lo pongo asi no me da error, pero quiero hacerlo como arriba, me podeis decir como
METHOD DBBrowse1DblClick( oSender, nKeys, nCol, nRow ) CLASS TFexplota
MSGINFO(::oDbfExplota1:NOMBRE)
TGRUPO_NIF = ::oDbfExplota1:GRUPO_NIF // GRUPO DE EXPLOTACION POR NIF
TANO = ::oDbfExplota1:ANO // Aí‘O DE TRABAJO
MSGINFO("VENTANA SELECCIONAR DOBLE CLICK "+ TNOMBRE)
::Close()
RETURN Nil
--