FiveTech Software tech support forums

Jose, Saludos, puedes adaptar este ejemplo a tu proposito UPDATECBX(oCbx,1,NIL,"Insetar al Final") UPDATECBX(oCbx,3,1,"Modificar 1") UPDATECBX(oCbx,4,NIL) // Quitar el Ultimo // Agregar una nueva LineaFUNCION UPDATECBX(oCbx,nOption,nAt,cData)  ...

Perhaps, if you are using pellesC, you need to "remove" the SORT variable in the combobox as NO.

Maybe:
ON Change := cTipo_Cli[ oCbx:nAt ]

Regards, saludos.

Antonio Linares wrote:Dear Silvio,

Do you use static oPaziente ?

CLASS TPaziente
DATA oWinClients
DATA oBar
DATA oPaziente
DATA oLbx
DATA cTitulo
DATA oTabs
DATA oIcon
DATA oCbx

... El ctooltip sí que sale, pero cuando se ha seleccionado la opción y se ha cerrado el combo. [url]function Main() SET _3DLOOK ON local oDlg, oCbx local cItem := "" DEFINE DIALOG oDlg FROM 5, 5 TO 15, 40 TITLE "A Dialog Box with combo" @ 1, 1 COMBOBOX oCbx VAR cItem ITEMS ...

... VAR oBrw:cSortOrder SIZE w,h PIXEL OF oDlg Primero defina un cuadro combinado desde código fuente/recursos sin elementos y luego oBrw:oSortCbx := oCbx Revise el ejemplo samples\xbsortcb.prg * REPORT: Cuando el informe se envía a un archivo de texto con la cláusula "TO FILE <file.prn>", ...

... oBrw:oSortCbx VAR oBrw:cSortOrder SIZE w.h PIXEL OF oDlg OR First define a combobox from source/resource with no items and then oBrw:oSortCbx := oCbx See: samples\xbsortcb.prg * REPORT: When report is output to a text file with clause "TO FILE <file.prn>"' center and right alignment ...

... Por otro lado quisiera que el combo aparezca exactamente del mismo tamaño que los get. He probado con HEIGHTGET , SELHEIGHT, oCbx:nSelectionHeight := <nNewHeight> y no funciona. Lo he logrado reducir cambiando el tamaño de la fuente del control (oCbx:SetFont(oFontCbx) ...

Nages, I remember you the combobox on the dialog @ 40, 400 COMBOBOX oCbx VAR cHead ITEMS aHead ; SIZE 150,200 PIXEL OF oTabella ; ON CHANGE ( oBrw:Seek( "" ), ; oBrw:cFilterFld := oBrw:oCol( cHead ):cExpr, ; oBrw:SetFocus() ) where we list the caption ...

Antonio, Nages @ 20, 280 COMBOBOX oCbx var oBrw:cFilterFld ; ITEMS aHdrs SIZE 150,400 PIXEL OF oDlg ; ON CHANGE ( oBrw:cFilterFld := "LAST",; oBrw:Seek( "" ),; oBrw:SetFocus() ) it's possible combobox not execute bchange ...

... the name of first column "Dip" on change of combobox I tried to save on oBrw:cFilterFld the value of column selected @ 20, 280 COMBOBOX oCbx var oBrw:cFilterFld ; ITEMS aHdrs ; ON CHANGE ( nField:=::nat,; oBrw:cFilterFld := aColumns[nField],; msginfo( oBrw:cFilterFld ),; oBrw:Seek( "" ...

thanks RAO I must insert it on click on header ? I tried with :bLClickHeader := { ||changeBrw(oBrw,aHdrs,oCbx) } #include 'fivewin.ch'#include 'ord.ch'#include 'xbrowse.ch'#include 'hbcompat.ch'REQUEST DBFCDX//----------------------------------------------------------------------------//function ...

... fontchange DEFINE FONT oFont1 NAME "TAHOMA" SIZE 0,-14 DEFINE FONT oFont2 NAME "TAHOMA" SIZE 0,-14 UNDERLINE @ 10,10 COMBOBOX oCbx VAR nVar Items aType Size 50,40 PIXEL of oDlg ; on CHANGE ( IIF( nVar=1, ( nRow-=12, oSay[1]:SetFont (oFont1 )), ( nRow+=12, oSay[1]:SetFont (oFont2 ...

Silvio,

just try :

@ 10,10 COMBOBOX oCbx VAR nVar Items aType Size 50,40 PIXEL of oDlg ;
on CHANGE ( IIF( nVar=1, nRow-=12, nRow+=12 ), ;
oSay[1]:Move( nRow ) , oSay[1]:refresh() )



best regards
Uwe

... que vas a mostrar en el combo, y en la claúsula ON CHANGE valoras si el array de "condiciones" tiene .T. en esa posición ( aCondiciones[ oCbx:nAt ] ), y si está a falso te vas al siguiente ( oCbx:nAt++, aunque tendrás que controlar que no se pase del Len() del array que hay en el combobox ...

... de forma que de acuerdo a una condición previa, cambie la seleccionabilidad de algunos de los elementos a mostrarse en la lista de selección (los oCbx:aItems), es decir la lista no cambiaría, pero si la seleccionabilidad de algunos de los elementos, de esta forma se los saltará con el recorrido ...