Página 1 de 1
Problema con Alias
Publicado: Sab Oct 13, 2007 12:53 am
por Rolando
METHOD BtnBmp1Click( oSender ) CLASS TABMVISTO
LOCAL oFrm := TSelPers():New( Self )
if oFrm:ShowModal() = mrOK
WITH OBJECT ::oParent:oVisto
:nropers := ::oParent:oCauPers:nropers
:nrorela := oFrm:oPers:nropers
:alias := oFrm:oPers:alias // Aqui alias es el nombre de un campo, pero devuelve Alias()
END WITH
::oDBEdit1:value := oFrm:oPers:apenom
endif
oFrm:end()
RETURN Nil
Saludos.
--
Rolando Sarrailh
Teléfono,
internacional +54-221-489-1480
nacional 0221-489-1480
local 489-1480
rsarrailh@gmail.com
--
Problema con Alias
Publicado: Dom Oct 14, 2007 2:22 pm
por jfgimenez
Rolando,
METHOD BtnBmp1Click( oSender ) CLASS TABMVISTO
LOCAL oFrm := TSelPers():New( Self )
if oFrm:ShowModal() = mrOK
WITH OBJECT ::oParent:oVisto
:nropers := ::oParent:oCauPers:nropers
:nrorela := oFrm:oPers:nropers
:alias := oFrm:oPers:alias // Aqui alias es el nombre de un campo, pero devuelve Alias()
END WITH
::oDBEdit1:value := oFrm:oPers:apenom
endif
oFrm:end()
RETURN Nil
Saludos.
Me temo que es un conflicto de nombres, ya que efectívamente hay un método de TDbfDataset con ese nombre. En este caso, deberás leer el campo con :FieldGet()
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--
Problema con Alias
Publicado: Mar Oct 16, 2007 4:29 pm
por Rolando
Gracias, me resulta extraño acceder a un metodo sin los ()
Saludos.
"Jose F. Gimenez" <
jfgimenez@wanadoo.es> escribió en el mensaje news:47120a06$[email=
1@ozsrv2.ozlan.local...]
1@ozsrv2.ozlan.local...[/email]
Rolando,
METHOD BtnBmp1Click( oSender ) CLASS TABMVISTO
LOCAL oFrm := TSelPers():New( Self )
if oFrm:ShowModal() = mrOK
WITH OBJECT ::oParent:oVisto
:nropers := ::oParent:oCauPers:nropers
:nrorela := oFrm:oPers:nropers
:alias := oFrm:oPers:alias // Aqui alias es el nombre de un campo, pero devuelve Alias()
END WITH
::oDBEdit1:value := oFrm:oPers:apenom
endif
oFrm:end()
RETURN Nil
Saludos.
Me temo que es un conflicto de nombres, ya que efectívamente hay un método de TDbfDataset con ese nombre. En este caso, deberás leer el campo con :FieldGet()
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--