atnsoft

oPrn:SayBitmap(0.1*nLinF,0.1*nCoF,(cDirApl)+"LOGO.BMP",3.0*nli,2.7*nco) id=code>id=code>Isto para um logo pequeno no cabeçalho. Altere os 2 ultimos parametros para tamanho maior. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Tente assim: Oprn:charsay(tlin,78,transform(perival,"99999")) AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Vá em propriedades da conexão local e ache GAS TECNOLOGIA FILTER DRIVER. Basta desabilitar. Outra coisa tambem: Se for o Avast o antivirus, no modulo arquivos, coloque em config. avançadas a exclusão de verificação em *.dbf, *.ntx, *.dbt. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR Editado por - atnsoft on 22/08/2012 10:54:53

Pessoal é o seguinte: Acabo de voltar de um cliente (200 km daqui). Ele tava reclamando da lentidão ao abrir os aquivos e vi que estava realmente muitoooooooo lentttooo e não só na abertura dos arquivos como tambem na tsbrowse, listbox, combobox. Das 9 maquinas, 3 estavam rapidas. Fui desabilitando antivirus, msn, skype, etc. e olhando os processos, tudo normal, rede normal, firefox, ie, etc. Notei uma grande lentidão ao abrir as propriedade de rede e depois de aberta, desabilitei o GAS TECNOLOGIA FILTER DRIVER e bingo... voltou a ficar rapido pra caramba. fiz uma consulta na internet e esse driver aí é do Banco do Brasil mesmo e pelo que já vi no forum, tem mais gente reclamando. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

João, já tinha visto tudo o que voce pode imaginar deste cara (inclusive o link que voce postou), mas não recebo o sibra.exe que comprei. Ele nao reponde o email, no facebook tb nao. Fiz um teste do programa (demo) dele e me atende perfeitamente. O Problema é o danado que nao me envia a copia final para uso sem restrições. Preciso deste programa para colocar em um antigo sistema de emissão de laudos feito no bom e velho clipper. Ah, e sem cor alguma. hehehehe Obrigado! AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

sibra- sistema de impressao brasileiro. site: http://www.caclipperwebsite.com/todos/node/sibra '> http://www.caclipperwebsite.com/todos/node/sibra Alguem sabe alguma coisa a respeito desse programa para impressão de sistemas clipper em impressoras usbs? Fiz a aquisição desse programa, mas até agora nada do email do dito cujo. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

sibra- sistema de impressao brasileiro. site: http://www.caclipperwebsite.com/todos/node/sibra '> http://www.caclipperwebsite.com/todos/node/sibra Alguem sabe alguma coisa a respeito desse programa para impressão de sistemas clipper em impressoras usbs? Fiz a aquisição desse programa, mas até agora nada do email do dito cujo. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

vperiodo := DtoC(periodo) Dtoc -> Data para character Ctod -> Character para data AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Eduardo, esta versão da TS nem tem nColAct. O erro tá exatamente em nCell. Só atualiza com duplo clique. Se o usuário movimentar somente a coluna, atualiza normalmente. (on change). O problema tá em editar o conteudo da celula errada ao dar somente um clique ou movimentar com as setas. Tá RUSSO. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Na TSbrowse, nao funciona oTeste:nCell em modo celled. Somente usando duplo clique para isso. Tem outra forma de pegar o conteudo da celula no lugar de aMostra[oTeste] := "blabla" ? Editado: Talvez com keybd_event() - seta abaixo/acima de certo. Como fica o keybd_event(xx,,,0) para seta abaixo e keybd_event(xx,,,0) para seta acima ? AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR Editado por - atnsoft on 13/08/2012 20:15:52

Na TSbrowse, nao funciona oTeste:nCell em modo celled. Somente usando duplo clique para isso. Tem outra forma de pegar o conteudo da celula no lugar de aMostra[oTeste] := "blabla" ? Editado: Talvez com keybd_event() - seta abaixo/acima de certo. Como fica o keybd_event(xx,,,0) para seta abaixo e keybd_event(xx,,,0) para seta acima ? AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR Editado por - atnsoft on 13/08/2012 20:15:52

FUNCTION GetCadNovo( lAppend ) Veja se esta funçao tambem nao vem de um valid. Note que o parametro é lógico. (.t., .f.) Tente mudar isso: ACTIVATE DIALOG oDlg CENTERED RETURN NIL ---> para Return(.T.) AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Os retornos das funcoes em valid devem ser: .t. ou .f. Assim: Static Function PesqFor2(nCodf,cNomeFor) local cNome := Space( 30 ) local nRecNo := RecNo() SET SOFTSEEK ON Select CadFor SET ORDER TO 2 Goto top If MsgGet( "Procurar", " Nome do Fornecedor ", @cNome, ; ".\bmp\lupa.bmp" ) If ! CadFor->(DbSeek( alltrim(upper(cNome)) )) MsgAlert( "Cadstro Não encontrado! ","Informa‡ao" ) SET ORDER TO 2 Goto top GO nRecNo Return(.F.) Endif nCodFor = CadFor->Codf cNomeFor = CadFor->Nome Endif Return(.T.) id=code>id=code>AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

"Acho" que o procedimento é o mesmo para vars: Atribua como local e finalize ao término: Local oObj, oTeste oObj:End() oTeste:End() AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Uso as funçoes abaixo para modificar para texto simples/com formatação. Alguns exemplos: if ! isGTF(Vtexto) //codigo //Vtexto2s:= TxttoGtf(Vtexto, ES_LEFT, oFont1 ) endif ............... if isGTF(cnTexto) cnTexto := GtfToTxt(Ptexto) endif nQtd := MlCount(cnTexto, 90) For nConta := 1 to nQtd Vtestal := MemoLine(cnTexto, 90, nConta) ............ id=code>id=code>AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Pessoal, coloquei no cadastro de fornecedores a inscrição municipal caracter 10. O contador diz que ficou pequeno mas não sabe o tamanho maximo. Alguem tem nos cadastros este campo e quanto de espaço deixo pra ele? AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Pessoal, coloquei no cadastro de fornecedores a inscrição municipal caracter 10. O contador diz que ficou pequeno mas não sabe o tamanho maximo. Alguem tem nos cadastros este campo e quanto de espaço deixo pra ele? AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

assim com %o_que_procurar% Select Id, nome, endereco, bairro, comple, cidade, cep, uf, telefone, telefone2, email, site, cnpj, inscr, obs, nomef, contato, funcontato, cadmun From fornecedor Where nome like '%silva%' or nome like '%souza%' AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Preciso criar uma agenda parecida com o Google agenda. Tentei com browse mas não consigo expandir a largura/altura até os moldes que preciso. Alguem tem alguma idéia ? AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Preciso criar uma agenda parecida com o Google agenda. Tentei com browse mas não consigo expandir a largura/altura até os moldes que preciso. Alguem tem alguma idéia ? AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Kapi, no mesmo link que voce postou, no inicio dele tem a resposta: http://pt.scribd.com/doc/54576084/Advpl-A-Linguagem AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Legal. Mais 2 "pé vermeio". Tambem sou do norte do Paraná. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Evaldo, estas mensagens foram em 2005, sei naum mas, acho que já resolveram. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Usei a TSbrowse para fazer algo do genero e ficou show. Com ela fica facil controlar as posições e conteudos, mas o que mais me interessou foram o uso de 8 cores diferentes para cada situação. Além do numero de linhas e colunas ficarem a seu critério ou do cliente. Além de poder usar bmps para as celulas e ficarem bem parecidas com o que voce postou. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR

Giovany, pelo que lembro, voce tem um sistema p/ cartórios né? Se, sim, entre em contato pois tenho um cliente pra voce. AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce C. Procópio - PR