FiveTech Software tech support forums

... de la especialidad, que es el que uso para guardar, mientras que la lista que muestra corresponde a la descripcion. itemfield "Cod_Esp"; listfield "Nom_Esp"; Muchas gracias. Saludos. Antonio

I would like to revisit this thread. For the code: REDEFINE DBCOMBO oCbxA54 VAR oEditWork:oWorkPartsr:paruf2 ALIAS a Src ITEMFIELD "1" LISTFIELD "2" ; ID 2504 OF oEditWork:oFld:aDialogs[2] UPDATE and the Resource: COMBOBOX. 2504, 395, 65, 25, 60, CBS_DROPDOWN | WS_BORDER | ...

... ) Called from: ualdash.prg => MAIN( 158 ) // Code REDEFINE DBCOMBO aGet[07] VAR nVessel ID 4007 OF oDlg ALIAS aVessel ITEMFIELD "1" LISTFIELD "2" //----------------------------------------------------------------------------- FUNCTION _SqlLoad( cSqlTable ) local oSqlLoad, ...

... ) Called from: ualdash.prg => MAIN( 158 ) // Code REDEFINE DBCOMBO aGet[07] VAR nVessel ID 4007 OF oDlg ALIAS aVessel ITEMFIELD "1" LISTFIELD "2" //----------------------------------------------------------------------------- FUNCTION _SqlLoad( cSqlTable ) local oSqlLoad, ...

We can use multi-dimensional array in DBCOMBO.

Example
@ r,c DBCOMBO <clauses> ALIAS <array> ITEMFIELD "1" LISTFIELD "2"

... CobraDlg PICTURE "999.99" REDEFINE DBCOMBO oEstado VAR oQryCob:C_Estado ID 122 OF CobraDlg ; ALIAS oQryEsta ITEMFIELD "codigo" LISTFIELD "descrip" REDEFINE DBCOMBO oVende VAR oQryCob:codi_vende ID 4004 OF CobraDlg ; ALIAS oQryVende ITEMFIELD "codigo_V" LISTFIELD ...

...  REDEFINE RSCOMBO nNumTiFa ;      ID 4003 OF oFld2:aDialogs[ 4 ] ;      RECORDSET oConsZZ  ;      ITEMFIELD "codig" ;      LISTFIELD "NOMBRE"  No se si tenga que ver con la definición del recurso... Saludos Saludos, revisa que veo que en el select llamas al campo ...

use slownik new shared via 'dbfcdx' database oSLOWNIK @ 40, K4 DBCOMBO oOPIS VAR pOPIS ; alias oSLOWNIK:cALIAS; itemfield "Opis"; listfield "Opis"; SIZE 120,100 PIXEL; of oDlg UPDATE how add new record to database oSlownik from DBCOMBO, if has't it in DBCOMBO list Using ...

use slownik new shared via 'dbfcdx' database oSLOWNIK @ 40, K4 DBCOMBO oOPIS VAR pOPIS ; alias oSLOWNIK:cALIAS; itemfield "Opis"; listfield "Opis"; SIZE 120,100 PIXEL; of oDlg UPDATE how add new record to database oSlownik from DBCOMBO, if has't it in DBCOMBO list

... alias for any number of DBCOMBO controls. Eg: USE STATES @ r,c, DBCOMBO oRec:State1 ......... ALIAS "STATES" ITEMFIELD "CODE" LISTFIELD "NAME" @ r,c, DBCOMBO oRec:State2 ......... ALIAS "STATES" ITEMFIELD "CODE" LISTFIELD "NAME" 2) You ...

... ID 4016 OF aFldX[1]:aDialogs[1] UPDATE ;      ITEMFIELD "familia_id" ;      LISTFIELD "familia_nombre" ;      ALIAS oQryFam  Note: For DBCOMBO both itemfield and listfield should be character fields. ...

... color CLR_BLACK, rgb(236,245,255) @ 126, 40 dbcombo oDBC1 var cDrpD of oDlg; alias oTcomp:cAlias; size 100,220 pixel; itemfield "COD" ; listfield "COMP"; update; // this dbcombo and all the ones above, display the selected .dbf fields properly @ 9.75, 3 SAY "D&river" ...

... un ejemplo del código: REDEFINE DBCOMBO oDesc_Emp VAR cDesc_Emp ID 4005 OF oDlg ; ALIAS "Empresa" ; ITEMFIELD "Codigo_Fem" ; LISTFIELD "Nombre_Fem" ; ON CHANGE Select_Emp(cDesc_Emp, oDesc_Emp, oBtn1); VALID Get_Emp(cDesc_Emp, oDesc_Emp)

... en un DBCOMBO, visualizar más de un campo? Por ejemplo: REDEFINE DBCOMBO oCom VAR mCOM ID 108 OF oDlg; ALIAS ALUMNOS ITEMFIELD "CODIGO" LISTFIELD "NOMBRE","CODIGO" UPDATE NOBLANK o algo así? Estuve viendo que existe el parámetro LIST, pero no sé como usarlo y si sirve ...

... OF oDlg SIZE 22, 11 @ 21, 8 dbcombo oDBC1 var cOrg of oDlg; alias oTcomp:cAlias; size 100,250 pixel; itemfield "COD" ; listfield "COMP"; update; @ .5, 26 SAY "&Drop" OF oDlg SIZE 22, 11 @ 21, 128 dbcombo oDBC1 var cDrp of oDlg; alias oTcomp:cAlias; ...