Hojeando el foro he visto que hay que hacer :end() de los objetos al salir
de una funcion, incluso de los objetos Locales.
¿Es así?
En el ejemplo de Carles hay cuatro objetos, oBmp, oDlg, oSay, oFont
¿por que solo con 2 de ellos se hace :end()?
oBmp:End()
oFont:End()
¿Hay alguna forma de ver que objetos hay en memoria?
*----------------------
STATIC FUNCTION About()
*----------------------
LOCAL oBmp, oDlg, oSay, oFont
LOCAL cText := 'Ejemplo de uso de FWPPC' + CRLF + CRLF + ;
'(c) Carles Aubia'
DEFINE FONT oFont NAME 'Arial' SIZE 0, -10
DEFINE DIALOG oDlg RESOURCE "About"
REDEFINE BITMAP oBmp NAME 'FWPPC' ID 200 OF oDlg
REDEFINE SAY oSay PROMPT cText ID 210 OF oDlg ;
FONT oFont COLOR CLR_BLACK, CLR_WHITE
oDlg:blClicked := {|| oDlg:End() }
oBmp:blClicked := {|| oDlg:End() }
ACTIVATE DIALOG oDlg CENTERED
oBmp:End()
oFont:End()
RETU NIL
:end()
- Carles
- Posts: 1149
- Joined: Fri Feb 10, 2006 2:34 pm
- Location: Barcelona
- Been thanked: 6 times
- Contact:
Hola Jose,
Realmente solo se tendria de aplicar el metodo End() al objeto oFont. oBmp ya lo destruye oDlg. Seguramente se quedo asi de las muchas pruebas q realize.
Realmente solo se tendria de aplicar el metodo End() al objeto oFont. oBmp ya lo destruye oDlg. Seguramente se quedo asi de las muchas pruebas q realize.
Salutacions, saludos, regards
"...programar es fácil, hacer programas es difícil..."
UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
"...programar es fácil, hacer programas es difícil..."
UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
- Antonio Linares
- Site Admin
- Posts: 42418
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 14 times
- Been thanked: 48 times
- Contact: