FiveTech Software tech support forums

FUNCTION SerializeData(aInfo)
LOCAL cResult := ""
LOCAL nItemCount := LEN(aInfo)

FOR nIndex := 1 TO nItemCount
IF ISNUM(aInfo[nIndex][2]) <---- gave me error here
cResult += aInfo[nIndex][1] + "=" + ALLTRIM(STR(aInfo[nIndex][2], 10, 0)) + CHR(10)
ELSE
cResult += aInfo[nIndex][1 ...

I like everything correct: How do I declare, NINDEX?

Me gusta todo correcto: ¿Cómo declaro, NINDEX?

Gracias, tks.

Regards, saludos.

Incluso lo intento, pero no puedo entender esta lógica. ¿QUIÉN ES NINDEX?
I even try, but I can't understand this logic. WHO IS NINDEX?


SILVMARR.prg(275) Warning W0001 Ambiguous reference: 'NINDEX'

SILVMARR.prg(275) Warning W0001 Ambiguous reference: 'NINDEX'

SILVMARR.prg(277) Warning W0001 ...

Incluso lo intento, pero no puedo entender esta lógica. ¿QUIÉN ES NINDEX?
I even try, but I can't understand this logic. WHO IS NINDEX?


SILVMARR.prg(275) Warning W0001 Ambiguous reference: 'NINDEX'

SILVMARR.prg(275) Warning W0001 Ambiguous reference: 'NINDEX'

SILVMARR.prg(277) Warning W0001 ...

... the xbrowse not return to initial state

https://i.postimg.cc/Qxs8KQQL/videot.gif


// Calculate the total height of the activated boxes
for nIndex := 1 to Len(aFilters)
if aFilters[nIndex, 1]
nVisibleBoxHeight += nBoxHeight
endif
next


// Adjust the height of the XBROWSE based on the ...

... oDlgx:= oBox[3]
else
oBox[2]:show()
oDlgx:= oBox[2]
oBrw:nBottomMargin += oBox[2]:nTop-2
Endif




chapGpt tell me this

For n= 1 to Len(aFilters)
IF aFilters[ nIndex, 1 ]
IF nBox <= len(oBox)
oBox[nIndex+1]:show()
oDlgx:= oBox[nIndex+1]
nbox++
Endif
Endif
next

but not run ok

I tried to pass nIndex in the for next loop to bchange and the value is always the same

We need to keep in mind at all times, NOT to use loop variables in building code-blocks inside a loop.
Build the code-block in a separate function using the loop variable as one of the parameters of the function ...

I tried to pass nIndex in the for next loop to bchange and the value is always the same

We need to keep in mind at all times, NOT to use loop variables in building code-blocks inside a loop.
Build the code-block in a separate function using the loop variable as one of the parameters of the function ...

... yourself

Nages

the main question was not about creating controls in for/next loop but to passa a value to bchange function

I tried to pass nIndex in the for next loop to bchange and the value is always the same

I made modifies on you sample https://forums.fivetechsupport.com/viewtopic.php?f ...

... to use with tdatabase and the possiblity to select the state but I have problem to run the cfilter

1) when I go to ResetFilter( aFilters,oDbf, nIndex ) nIndex is allways 3
2) to create a filter I select the state and create the new filter ( ru nok I put as 3)

local cState:= space(25)

If ...

... work

and insert a new method to recalc the position nTop for each ::apanels as this

METHOD RecalcPosTask() CLASS TTaskPanel
local n

for n = ::nIndex + 1 to Len( ::oWnd:aPanels )
::nHeight = ::nTotalHeight()
for n = ::nIndex + 1 to Len( ::oWnd:aPanels )
::oWnd:aPanels[ n ]:nTop ...

... el que me ayuden como se hace eso..


FUNCTION MENU_PRODUCTO(cEmpresa,cUsuario)
Local oDlg, oBrw, oFont2, oCol, oSay, oBtn2[ 9 ]
LOCAL oGet,nIndex,aIdx:={}
LOCAL cBusca:= Space(60)
Local cSeek:=""
Local oCampo, cCampo :=space(50)

cTab_Art:=xServer:Query("SELECT a.*, b.*, c.* FROM tab_art AS a ...

aCombinaciones[nRow, nCol] = (nIndex - 1) MOD 90 + 1 ?????


How I can modify this ? what mean " MOD " ?

the function generated
FUNCTION Main(nChoice)
LOCAL aNumbers[90], nSumCyclo, nSumMath, nDistCyclo, nDistMath
LOCAL nRow, nCol, nIndex

// Inicializar la matriz de n£meros
FOR nIndex = 1 TO ...

JoseLuis wrote:

Code: Select all | Expand

(aAlias[24])->(Ordsetfocus(nindex))
(aAlias[24])->(Dbgotop())
RETURN NIL
 

y si le pones
(aAlias[24])->(dbsetorder(nindex))

... CLASS FWTVlc FROM TActiveX DATA oControl, oPlayList, oInput, oVideo, oAudio, oMedia DATA nStepVolume, nVolumen, nFilterRec, nRECNO, nIndex DATA cFileName DATA lRun DATA lLoop DATA lEndless DATA bRClicked, bMenu, bPlayNext DATA oFont, oParent DATA cTimer, lStream METHOD New&#40; oParent ...