... para que lo termine bién. // Si lo corro en una notebook viejita y lenta funciona, // pero en un equipo un poco más rápido los genera vaciós. skip enddo
... is the source AAdd( ademo, {"00000","Nessuna"} ) DO WHILE !oDbf:Eof() AAdd( ademo, {oDbf:Cod,TRIM(oDbf:DESC)} ) oDbf:Skip() ENDDO AAdd( ademo, {"00000","Aggiungi"} ) I wish only "Nessuna" and "Aggiungi" with another color more clear
... well. For example, if you have values and they are negative, you can present these in HTML in red instead of black. Thus, you have the `do while/enddo` not passing parameters like `[bFor]`, `[bWhile]`, `[nNext]`, `[nRec]`, `[lRest]`. Programming the loop and conditions is more readable, maintainable, ...
... to Create atable from oTemp4 ........................ then call CreateRtf(aTable,c1,c2,oFile) c1:="" c2:="" aTable := {} Enddo oTemp4:gotop() this is the function ( it must vreate the table on the same file rtf ) Function CreateRtf(aTable,c1,c2,oFile) ...
... I have a print PRINT oPrn NAME "My Print" PREVIEW PAGE WHILE !EOF() some instruction like Prn:Say( nRow, nCol , bla bla ) ENDPAGE PAGE ENDDO ENDPAGE ENDPRINT I need some hints about the possibility to save the print into rtf for or doc You know for instance when you have a report in ...
... for instance PRINT oPrn NAME "My Print" PREVIEW PAGE WHILE !EOF() some instruction like Prn:Say( nRow, nCol , bla bla ) ENDPAGE PAGE ENDDO ENDPAGE ENDPRINT does exist a clause that permits me to run the function without print anything only for calculate number of pages it would be ...
... .t. ) // Disable my app until this window is closed! IF !empty(oDlg) oDlg:disable() ELSE oWnd:disable() ENDIF DO WHILE empty(cHtml) SysRefresh() ENDDO IF !empty(oDlg) oDlg:enable() oDlg:SetFocus() ELSE oWnd:enable() oWnd:SetFocus() ENDIF RETURN cHtml Thanks, Randal
Do you have WHILE... ENDDO with very LONG processing, without the SYSREFRESH() command? And you didn't inform what is the configuration of the computer and what is the capacity of the MEMORY STICK. ¿Tiene WHILE... ENDDO con un procesamiento ...
In which FUNCTION? In this function, have WHILE... ENDDO? What memory stick does this machine have? If I wasn't afraid, post the SOURCE code for criticism, ok? ¿En qué FUNCIÓN? En esta función, tenga WHILE... ENDDO? ¿Qué tarjeta de memoria tiene esta ...
... PREVIEW --> ¿ Como lo guardo ? do while !eof() oPrn:cmSay(08.90,03.30, alltrim(xnom)) oPrn:cmSay(08.90,15.00, alltrim(wbar)) l:=l+1 skip enddo ENDPRINT