Seleccion del primer elemento de un DbCombo..

Seleccion del primer elemento de un DbCombo..

Postby Raymundo Islas M. » Sat Jan 20, 2007 12:29 am

Hola a todos

Cuando manejo un combobox y quiero inicializar la variable para que salga con el valor del 1er elemento hago algo como esto :

cNumPart := aNumsParts[1]

REDEFINE COMBOBOX cNumPart ID 105 OF bla, bla, bla

Cual seria el equivalente para realizar la misma operacion usando un DbCombo ???

Ya le estuve haciendo malabares y no he podido, alguna sugerencia ??

Gracias Anticipadas y Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Postby Armando » Sat Jan 20, 2007 1:30 pm

Raymundo:

Prueba asignando a la variable el contenido del campo llave del primer registro:

En lugar de cNumPart := aNumsParts[1]

Mete el valor del primer registro cNumPart := (cAlias)->CAMPOLLAVE

Espero sea lo que buscas, Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3184
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Postby Raymundo Islas M. » Sat Jan 20, 2007 8:27 pm

Hola Armando

En teoria, por logica ese seria lo equivalente, pero creeras que no lo toma correctamente !

Seguire probando, agradezco mucho tu respuesta.

Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Postby Armando » Sun Jan 21, 2007 1:48 am

Ray:

Esto es lo que hago y me funciona bien con FWH 2.7 Mzo/2006 y xHarbour

IF lAppend
oDbf:BLANK()
oDbf:MOD_LIN := (cLinea)->LIN_LIN
ELSE
oDbf:LOAD()
ENDIF
...
...
REDEFINE DBCOMBO aGets[04] VAR oDbf:MOD_LIN ID 104 OF oDlg;
UPDATE ALIAS (cLinea) ITEMFIELD "LIN_LIN" LISTFIELD "LIN_DES"


Saludos, Armando
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3184
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 52 guests