Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Passing Parameters
Message
From
17/02/1999 21:08:41
 
 
To
17/02/1999 13:38:32
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Miscellaneous
Thread ID:
00188484
Message ID:
00188727
Views:
18
Que tal....prometo que esta es la ultima vez que lo pregunto...

Lo que vos me decis hacerca de como hacerlo en un .PRG lo entiendo.
Mi problema es cuando intento hacerlo en forma visual...
Luego de definir la clase, en el menu CLASS / NEW METHOD.
Aqui agrgo el metodo que quiero, pero no se como decirle que se metodo aceptara parametros.

Si incluyo "PARAMETERS cTableAlias" en el bloque de codigo del metodo SetTable de mi objeto. Al referenciarlo pasando como parametro el nombre de la tabal que quiro navegar (clientes), VFp me arroja el mensaje de error que indica que la funcion no esta preparada para recibir parametros.

La funcion esta definida asi:

*************************************
PARAMETERS cTableAlias

IF TYPE("cTableAlias") = 'C'
this.cmdTop.TableAlias = cTableAlias
this.cmdPrior.TableAlias = cTableAlias
this.cmdNext.TableAlias = cTableAlias
this.cmdBottom.TableAlias = cTableAlias
ENDIF
**************************************


Al referenciarla como por ejemplo:

THISForm.navegador1.SetTable("clientes")

VFP me da el error que te comento arriba.

Ahora, si defino toda la calse en un .PRG funciona de maravilla.

Pero el tema es que quiero definirla visualmente ya que ahorro mucho codigo, y sobre todo tiempo.

Por otra parte, las funciones que aceptan metodos propias de foxpro com por ejemplo: ADDOBJECT, en el bloque de codigo indican la cantidad y tipo de parametros que aceptan (ADDOBJECT cName, oClass). Mi funcion tampoco muestra eso a la hora de usarla.

Espero no caer gordo....haber si puedo solucionar este problemita que supongo es muy sencillo...

Gracias
Emiliano
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform