Xailer & OZ Software

Deberí­a usar TAppData para añadir nuevas funcionalidades y no TApplication.
Precisamente se creo TAppData para que no fuera necesario sobrecargar
TApplication.
Un saludo
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
http://www.xailer.com/forum
http://www.xailer.com/dokuwiki
escribió en el mensaje de noticias:4d5175e6$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Ola,
Estamos portando a versão 1.x para 2.x, e encontramos o seguinte
problema ao redefinir a classe tapplication afim de incluirmos outras
funcionalidades:
CLASS TApplication FROM XApplication
METHOD Initialize() CONSTRUCTOR
ENDCLASS
METHOD Initialize()
super:Initialize()
Return Self
Necessitamos estar com isto funcionando para definirmos a compra da
versão 2.x.
O exemplo acima causa um erro grave.
Sds,
wilson alves
CASTELO Porto Software

Wilson,
> Estamos portando a versão 1.x para 2.x, e encontramos o seguinte
> problema ao redefinir a classe tapplication afim de incluirmos outras
> funcionalidades:
>
> CLASS TApplication FROM XApplication
> METHOD Initialize() CONSTRUCTOR
> ENDCLASS
>
> METHOD Initialize()
> super:Initialize()
> Return Self
>
> Necessitamos estar com isto funcionando para definirmos a compra da
> versão 2.x.
> O exemplo acima causa um erro grave.
El problema se debe a un bug en el motor de objetos de xHarbour. Para que
funcione lo que quiere, sólo hay que cambiar PRIVATE: por :PROTECTED en la
definición de la clase TApplication. Si no tiene el fuente de esta clase,
adjunto el .obj de la misma ya corregido para que pueda añadirla a su
proyecto.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--

Attached files Application.zip (7.8 KB)Â

Valeu José,
Muito obrigado!!!
Wilson Alves
CASTELO Porto Software
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escreveu na notí­cia da
mensagem:4d52ea3f$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Wilson,
>
>> Estamos portando a versão 1.x para 2.x, e encontramos o seguinte
>> problema ao redefinir a classe tapplication afim de incluirmos outras
>> funcionalidades:
>>
>> CLASS TApplication FROM XApplication
>> METHOD Initialize() CONSTRUCTOR
>> ENDCLASS
>>
>> METHOD Initialize()
>> super:Initialize()
>> Return Self
>>
>> Necessitamos estar com isto funcionando para definirmos a compra da
>> versão 2.x.
>> O exemplo acima causa um erro grave.
>
> El problema se debe a un bug en el motor de objetos de xHarbour. Para que
> funcione lo que quiere, sólo hay que cambiar PRIVATE: por :PROTECTED en la
> definición de la clase TApplication. Si no tiene el fuente de esta clase,
> adjunto el .obj de la misma ya corregido para que pueda añadirla a su
> proyecto.
>
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>