FiveTech Software tech support forums

... j := m := nWd := nBt := 0 local nRg := 8 local nK3 := nK1 + 50 local nK4 := nK2 + 50 local oFnt := if( !empty( oFont ), oFont, oFont_pagr ) local nFh := oFnt:nHeight local nFw := oFnt:nWidth local nRw := nFh - 1 DEFAULT lMask := .f. DEFAULT cText := if( lMask, if( cLg == "L", "Kodas :", "Code ...

... := Hash() for nGt := 1 to len( aFlds ) cFld := aFlds[ nGt ] @ nRw, nCol GET oGets[ cFld ] VAR aGets[ nGt ] PICTURE aPct[ cFld ] PIXEL SIZE nSz, nFh VALID n_pas( cAlias, cFld ) next Frank , very good sample ! I'm using hash , but in that way - no so much brains :-) . Many thanks to you ! With ...

... := Hash() for nGt := 1 to len( aFlds ) cFld := aFlds[ nGt ] @ nRw, nCol GET oGets[ cFld ] VAR aGets[ nGt ] PICTURE aPct[ cFld ] PIXEL SIZE nSz, nFh VALID n_pas( cAlias, cFld ) next Frank

... aFlds ) ] ... for nGt := 1 to len( aFlds ) cFld := aFlds[ nGt ] @ nRw, nCol GET oGets[ nGt ] VAR aGets[ nGt ] PICTURE aPct[ nGt ] PIXEL SIZE nSz, nFh VALID n_pas( cAlias, cFld ) next It seems that this isn't working .. :-(( I remmember something about deattached locals , but at this moment i can't ...

... aFlds ) ] ... for nGt := 1 to len( aFlds ) cFld := aFlds[ nGt ] @ nRw, nCol GET oGets[ nGt ] VAR aGets[ nGt ] PICTURE aPct[ nGt ] PIXEL SIZE nSz, nFh VALID n_pas( cAlias, cFld ) next It seems that this isn't working .. :-(( I remmember something about deattached locals , but at this moment i can't ...

... , MSGINFO HAS NO EFFECT !!!!!!!!! Frank Try this codeblock : @ nRow, nCol COMBOBOX oCbx VAR cPav PIXEL UPDATE VALID !empty( cPav ) OF oDlg SIZE n, nFh * 4 aeval( MyArray, { |x| aadd( oCbx:aItems, x[ 2 ] ) } ) // for multidimensional array . or aeval( MyArray, { || aadd( oCbx:aItems, MyArray ) } ...