FiveTech Software tech support forums

... "Authorization", "Basic "+hb_base64Encode(cCred)) oHttp:Send( cHttpSend ) oHttp:WaitForResponse( nSecs ) Sysrefresh() IF oHttp:status=200 cWinResp := oHttp:ResponseBody ENDIF

... oHttp:SetRequestHeader( "Authorization", "Basic "+hb_base64Encode(cCred)) oHttp:Send( cHttpSend ) Sysrefresh() IF oHttp:status=200 cWinResp := oHttp:ResponseBody ENDIF

Gracias !

No difference, other than the duration:

Code: Select all  Expand view

function SysWait( nLong )

   local nSeconds

   DEFAULT nLong := .1
   nSeconds := Seconds() + nLong

   while Seconds() < nSeconds
     SysRefresh()
   end

return .t.

SysWait() ó SysRefresh()
Maestro Antonio Linares C. !
cual es la diferencia entre estas 2 funciones?

saludos !

... with SQL .. Recordsets can be added to or edited one record at a time and when a committ is made all I do is issue oRs:Update(), and perhaps a SysReFresh() and I have never had any visability problems even in large networks .. The only reason I use dbfcdx is to write temporary data to use in ...

Estimado Sebastian,

Puedes copiar el código aqui para ver como lo haces ?

Pudiera ser un problema de velocidad y tal vez necesites hacer alguna llamada a SysRefresh()

... StrTran( "whatsapp://send?phone=" + cTelefono + "&text=" + cMensaje ), " ", "%20" ) ) SysRefresh() // ó SysWait( 5 ) prueba con distintos valores hasta que te funcione bien CreateObject( "WScript.Shell" ):SendKeys( "~"

... "+strzero(99->cliente,4)+" - Fac.: "+xlet+"-"+str(xemi,1)+"-"+strzero(99->numero,6) oText:refresh() sysrefresh() enddo sele 1 oIndex:End() oDlg:End() sysrefresh() xtim2:=time() msgwait(ELAPTIME(xtim1,xtim2),"Tiempo Transcurrido",4) *------------------- ...

Por si suena la flauta yo pondría algun(os) estrategicamente:

hb_GCAll(.t.)
SysRefresh()

y

oPrn:= NIL, siempre que cualquier objeto deje de usarse

... "activate" call of DoCloseWindowAndDBF() when "Timeout" --- HMG use DOEVENTS which "seem" me equivalent to Fivewin SysRefresh() it use TranslateMessage( &Msg ) and DispatchMessage( &Msg ) to get Event from Queue HB_FUNC ( DOEVENTS ){   MSG Msg;  ...

... from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 0 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 0 ) Called from: => SYSREFRESH( 0 ) Called from: .\source\function\MSGRUN.PRG => STOPUNTIL( 0 ) Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:ACTIVATE( 0 ...

Try using SysRefresh() instead.

... a Softgestion.pe" DEFAULT lMsgOff:=.T. IF MEMVAR->oConex <> nil.AND.MEMVAR->NTIMER>0 WaitOn(cTitulo,@oWait) SysRefresh() oQry:=MEMVAR->oConex:Query("SELECT 1") WaitOff(@oWait) IF oQry:RecCount()==0 MsgWait("Reconectando con el servidor...",cTitulo,3) ...

Me parece que la llamada manual de sysrefresh y el recolector no es necesario, dado que internamente al asignar NIL a la variable contenedora de un objeto query esto hace que se dispare una función de MySQL en C que cierra la consulta y llama ...