FiveTech Software tech support forums

...                    "128","PDF417","DATAMATRIX","QR"}    local cItem    := "123456789012"   PRINT oPrn PREVIEW   DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-14 OF oPrn   PAGEFor n= 1 to Len(aBarCode) @ ...

... is used when "on change" Event is fired Sample i saw look like this local cItemo:bSetGet := {|u| If( PCount()==0, citem , citem := u ) } now i have "Value" in cItem but what about ENTER (or Dblclick) :?: which Codeblock ( from which Super CLASS ...

... 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 { "Option ...

Marc, Just check not to cover any buttons ( added to sample testbar.prg ) @ 2, 350 COMBOBOX oCbx VAR cItem ITEMS { "Testing", "this", "ComboBox" } ; SIZE 100, 300 OF oBar PIXEL HEIGHTGET 22 http://www.pflegeplus.com/IMAGES/Combo2.jpg ...

... Id='+xUSERID+';Password='+xPASSWORD aImages := Directory( cCft + "*.*" ) FOR nX1=1 TO LEN(aImages) cTemp := aImages[nX1,1] cItem := "" oSay:SetText( LTRIM( STR( ROUND( (nX1/LEN(aImages))*100, 2), 9, 3) ) + "% Complete . . ." ) Sysrefresh() FOR nX2:=1 ...

... := [INSERT INTO asset_chart(] cSqlIns += [itemnumber,] cSqlIns += [inspcft] cSqlIns += [)] cSqlIns += [ VALUES (] cSqlIns += ['] + _SqlClean( cItem ) + [',] cSqlIns += MemoRead( cCft + aImages[nX1,1] ) cSqlIns += [)] TRY oSql:Open( cSqlIns, xCONNECT ) nAdded++ CATCH oError IF MsgNoYes( "Unable ...

... + 4.8 // font-height + top and bottom-space nBrwHeight := nRowHeight * LEN( aItems ) // tested with 10 and 5 items @ 5, 5 LISTBOX oLbx VAR cItem ITEMS aItems ; SIZE nBrwWidth, nBrwHeight PIXEL OF oDlg the total height nDlgHeight := nBrwHeight + 45 ( extra space for the defined button ) ...

... 2) If I use HEIGHTGET search is not working anymore. Thanks in advance Otto #INCLUDE "FIVEWIN.CH" REQUEST DBFCDX function Main() local cItem, aItems := {} local oCbx local cCbx := "" local oCbx2 local cItem2 := "" local oDlg local oFont //----------------------------------------------------------------------------// ...

Asi puedes saber cuando se selecciona un ítem con el ratón:

oDBC1:bChange = { | oDbc, cItem | MsgInfo( cItem ) }

Hola creo que es un error conceptual mio... cuando hago: REDEFINE COMBOBOX oCom VAR cItems PROMPTS´{"Juan","Pedro","Mateo"} ID 101 OF oDlg siempre le doy el valor numèrico donque quiero que se pare el COMBO, por ejemplo: cItem:=2 si quiero ...

... would have returned both records and there are additional relational tree's from Brevision on other foreign key's in tables Corposal and the Citem table which uses the same root foreign key concatenated rule as root+.01,.02,.03, etc .. The results I got did not seem different from the original ...

... view the main table that has the value .. since that field value was not found in the array . the combobox value is blank. There is a method add( cItem, nAt) for the combobox, so technically you could add it on the fly. But, I still maintain that you should build the lookup table and never delete ...

METHOD AddItem( cItem, cResName, bRedefineControls, cnHelpId, bPrevItemDeleted, bPostItemDeleted) CLASS TFolderEx //Dos nuevos parámetros local oDlg local nLen local n local oThis := Self if ValType( ::bPrevItemAdded ) == "B" ...

Junio 2013 ========== * Nuevo : Método Set( cItem ) en la clase TDbCombo, ahora se inicializa correctamente el elemento: viewtopic.php?p=146508#p146508 * Corrección: Había un error en la clase TMsgItem, en el método Refresh() que causaba pérdida ...

June 2013 ========= * New: Method Set( cItem ) CLASS TDbCombo, now initializes properly the shown item: http://forums.fivetechsupport.com/viewtopic.php?p=146508#p146508 * Fix: There was a bug in Class TMsgItem Method Refresh() that caused a ...