FiveTech Software tech support forums

... FUNCTION _XmlQuery() local cURL := "https://xxx.com/token" , ; cSaveAs := "c:\winapps\onasset\xml\inbox\" , ; lPass := .F. , ; oProg := 0 , ; cHttpSend2 := "" , ; oHttp2 , ; cHttpSend3 := "" , ; oHttp3 , ; cWinResp := "" , ; cTokenId := "" ...

... todos. Tengo una aplicaciòn con opcion de Copias de Respaldo, con la siguiente linea lOk:= HB_ZipFile( cNameZip, aFile, 9,{|x,i| PINTAR(i, nLast, oProg) } ,; TRUE, cCodAlm, TRUE, FALSE ) //, pFileProgress ) donde cCodAlm es una variable alfanumerica de 3 digitos que constituye el password ahora ...

... Antonio, muchas gracias. He revisado el código de la siguiente manera: static function fTimer( cMsg, bAction, nInterval ) local oDlg, oProg, oTmr DEFINE DIALOG oDlg TITLE cMsg @ 2, 3 PROGRESS oProg POSITION 0 SIZE 120, 10 oDlg:bStart = { || WaitRun(bAction, 0), oDlg:End(), SysRefresh() ...

... no lo consigo. He puesto en el ON INIT un codeblock, pero no marcha. Este es el código de la función: static function fTimer( cFile ) local oDlg, oProg, oTmr DEFINE DIALOG oDlg TITLE "Conexión dispositivo" @ 1, 3 PROGRESS oProg POSITION 0 SIZE 120, 10 @ 2.5, 10 BUTTON "Conectar" ...

Hi Ramesh, I use xHarbour Builder Sep. 2008 and FWH 8.10. IF wfSaveURL(cURL, cSaveAs, oProg, nFileSize) ... File is there AND downloaded as cSaveAs You are right. It should be. Yes oProg is a Progress Bar object. like @ 80, 010 PROGRESS oProg POSITION ...

Hello Mr.Horizon A Small correction : IF wfReadURL(cURL, cSaveAs, oProg, nFileSize) ... File is there AND downloaded as cSaveAs should be IF wfSaveURL(cURL, cSaveAs, oProg, nFileSize) ... File is there AND downloaded ...

... of the total number of indexes. Also you have defined the range as 0-100. So, try this--take out the first two lines and add the last line. // oProg:StepIt() // oProg:nPosition += nPercent oProg:setPos( nPercent ) Regards, James Mr.James's solution solved my problem. But now another problem. ...

... of the total number of indexes. Also you have defined the range as 0-100. So, try this--take out the first two lines and add the last line. // oProg:StepIt() // oProg:nPosition += nPercent oProg:setPos( nPercent ) Regards, James

@ 0.3, 0.3 PROGRESS oProg POSITION nValue SIZE 80, 12 OF oStatusBar

... C:\sistema\progres.prg(9) Error E0030 Syntax error: "parse error at '@'" este es el ejemplo : #include "fivewin.ch" function Mainp() local oDlg, oProg, nValue := 30, oProg2, nValue2 := 20 DEFINE DIALOG oDlg resource "ODLG_browali" TITLE "Progress Bars" linea 9 @ 1, 1 PROGRESS oProg POSITION nValue ...