FiveTech Software tech support forums

ACTIVATE VALID()

OU

bValid

veja se isto resolve?

If GetHostByName( "bazevani.com.br" ) = "0.0.0.0"

É um exemplo de DesktopAlert, utilizando códigos de HTML. para executar utilize assim: MsgFancy(Memvar->oDlg,"Acesso negado!!! <br/><br/> Não é permitido modificar lançamentos quando já baixado (Repassado).",nil, CLR_YELLOW,.T.,.F.) coloque junto esta função... #define LWA_ALPHA 2 #define ...

nPathTemp function MsgFancy(oWnd, cTexto, aPos, oCor, lAguarda, lTransparente) local oDlg local oBtnClose, aTexto local oSay, lCenter local oImage, oLbx local lSaida:=.F., nCorFundoHTML := "#ffffcc" //azul claro lCenter := aPos == NIL //DEFAULT oCor := nrgb(255,255,255) DEFAULT aPos := {0,...

I'm using xBrowse:

oLbx_List: lSeekBar: = .t.

When we start typing% the error below is shown:

FWH1709 + XHarbour

Tive problemas tambem, então troquei por este: CursorWait() cURL := "http://bazevani.com.br/asp/pesquisa.asp?tipo=L&serie=" + _Serie oHttp := CreateObject("Microsoft.XMLHTTP") oHttp:Open("GET",cURL,.F.) lNetError:=.f. TRY oHttp:Send() CATCH oError lNetError := .T. E...

oGet:cTooltip := {"Sua mensagem","Titulo"}

Quando se utiliza %, não é necessário utilizar UPPER

Ronaldo

Antonio Linares, estou trabalhando com String SQL para fazer a leitura de arquivos DBF, veja se isto interessa para você?

Para consultas ficou muito rapido!


http://fox.wikis.com/wc.dll?Wiki~VFPOleDBProvider

à algum tempo necessitava utilizar String SQL em arquivos DBase (DBF), abaixo um exemplo: txSql := "SELECT cod_imovel, cod_locat, Day(baixa_loca) As Dia " txSql += "FROM rec2310 " txSql += "HAVING Dia = 0 " txSql += "GROUP BY cod_imovel, cod_locat, dia " txSql...

objeto:show()

existe tambem.

objeto:disable() / objeto:enable()

Ronaldo

I would like to implement the method cmline in TPrinter but want to do it in another prg I did so, but gives error winfunc.prg CLASS TPrinter FROM TPrinter METHOD CmLine( nTop, nLeft, nBottom, nRight, oPen ) INLINE ::Cmtr2Pix(@nTop, @nLeft), ::Cmtr2Pix(@nBottom, @nRight),; MoveTo( ::hDCOut, nLeft, n...

usrrdd.lib esta tambem...

precisa colocar junto adordd.lib

ACTIVATE dialog odlg on init restauraposicao(odlg) valid gravaposicao(odlg) Function GravaPosicao(oTemDlg) LOCAL aRect, nNome LOCAL nDlg_Largura, nDlg_Altura aRect := GetWndRect( oTemDlg:hWnd ) nNome := oTemDlg:cResName WritePProString( nNome , "Topo" , alltrim(str(aRect[1])) , Curdrive()+...