Combobox y GetEdit, Misma Columna XBROWSE

[elmoiquique]

Existe la posibilidad de que en un Xbrowse y en una sola columna convivan los combobox y los get,, ejemplo

GET
GET
GET
COMBOBOX
GET
COMBOBOX
COMBOBOX

y asi sucesivamente en un xbrowse pero en una columna, estaba haciendo algo asi pero no funciona,, lleno un arreglo mixto con get y combobox, pero no resulta,, no se si se puede hacer

Code: Select all | Expand

do while .not. eof()

 if (odbf1:calias)->tdbf
  acentidad:={}
  dbselectarea(odbf:calias)
  set order to 1
  go top
  do while .not. eof()
   aadd(acentidad,(odbf:calias)->nombre+"-"+(odbf:calias)->codigo)
   skip
  enddo
 else
  acentidad:=""
  acentidad:=(odbf1:calias)->nombre
 endif
 ritem +=1
 AADD(acItem,{ ritem, acentidad })
 
 dbselectarea(odbf1:calias)
 skip
next


 REDEFINE XBROWSE oLbx1 ID 4001 OF oFld:aDialogs[2];
           COLUMNS 1,2;
           HEADERS "Item","Descripcion";
           COLSIZES 40,360;
           PICTURE "","";
           ARRAY acItem UPDATE FOOTERS LINES AUTOCOLS CELL AUTOSORT 

[Antonio Linares]

Estimado Quique,

Revisa FWH\samples\inspect.prg