FoxPro/Visual FoxPro - Problema con Visual Fox Pro

 
Vista:

Problema con Visual Fox Pro

Publicado por Hernan (4 intervenciones) el 15/12/2008 21:17:11
Buenas a todos, tengo un problema con Visual FoxPro 9.0, es el siguiente:

En un archivo *.prg defino una clase asi:

DEFINE CLASS persona AS CUSTOM
nombre = "Hernan"
apellido = "Hernandez"
PROTECTED nombre, apellido

FUNCTION mostrar
RETURN this.nombre + " " + this.apellido
ENDFUNC
ENDDEFINE

luego en el evento INIT de un FORM tengo el siguiente codigo:

SET PROCEDURE TO *.prg
PUBLIC oPersona, nombre

oPersona = CREATEOBJECT("persona")

nombre = oPersona.mostrar

=MESSAGEBOX(nombre,048,"Prueba")

Pero no me muestra el mensaje con el nombre, es como si la funcion dentro de la clase no devuelve nada o no funciona no se que pasa, es algo tan sencillo pero no tengo idea el porque no funciona
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema con Visual Fox Pro

Publicado por enrique (1041 intervenciones) el 16/12/2008 17:34:40
Ponlo asi

Buenas a todos, tengo un problema con Visual FoxPro 9.0, es el siguiente:

En un archivo *.prg defino una clase asi:

DEFINE CLASS persona AS CUSTOM
nombre = "Hernan"
apellido = "Hernandez"
PROTECTED nombre, apellido

FUNCTION mostrar
parameter v_t
RETURN this.nombre + " " + this.apellido
ENDFUNC
ENDDEFINE

SET PROCEDURE TO *.prg
PUBLIC oPersona, nombre

v_a=""
oPersona = CREATEOBJECT("persona")

nombre = oPersona.mostrar(a)

=MESSAGEBOX(nombre,048,"Prueba")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con Visual Fox Pro

Publicado por Hernan (4 intervenciones) el 17/12/2008 14:29:55
Gracias amigo, me funciono!!! una ultima pregunta, porque eso funciona asi?? enviando una cadena vacia!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con Visual Fox Pro

Publicado por enrique (1041 intervenciones) el 17/12/2008 19:52:47
El tema es que cuando llamas a una funcion ( en tu caso )

nombre = oPersona.mostrar(a)

y el resultado de esa funcion lo queres poner en una variable (nombre), debes llamar a esa funcion con una variable para poder retornar lo que quieras.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar