soares289

Ae =) Finalmente, irei com certeza!!! ;D Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Ninguem ai que use essa lib que possa me ajudar? Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Resolvi aqui. O problema era alguma coisa que estava no include. Acredito que as partes com os structs. Então peguei só os defines usado pela rotina e deixei direto no prg dela, pra nao ter mais que usar o include, e funcionou. Editado por - soares289 on 30/04/2009 17:41:52

citação:Veja seu email... Abraços.. Luiz Arruda - Corumba(MS) FiveWin 9.01 / 9.02 /9.03 / 9.04 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> id=quote>id=quote>Luiz, olhei lá. O Exe que veio funcionou normal. Já o seu codigo, compilei ele, e deu o mesmo problema. Agora quase certesa que é alguma coisa com a minha versão. Vlw pela força, espediente aqui está no fim, amanhã cedo vou fazer mais alguns testes. Abraços. obs: A versão está na assinatura. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Com esse problema da NFe precisei montar uma classe para trabalahar com XML, achei meio complicado usar a que vem no harbour, entao montei uma q pega uma hash e transforma em xml, e vice-versa. Deu alguns problemas no inicio, mas ja tenho bastante clientes usando. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Olá Tive esse problema quando tinha um timer rodando no programa, antes de fechar, tinha q para-lo. Tive problemas assim também, quando comecei usar uma EXIT FUNCTION. Pois ela também sempre rodava depois de fechar tudo. Verifica se no seu codigo tem alguma coisa que tem um objeto ou variavel recebida por referencia, se seu progrma tenta acessar o conteudo referenciado e ele ja tiver saido da memoria da isso ai. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Estou tendo esse problema quando adiciono o codigo. Posso até tirar a linha do function main SetUnhandledExceptionFilter( @GpfHandler() ) que continua dando o erro. Tentei colocar a funcao GpfHandler direto no ERRORSYS.prg, mas o erro continua aparecendo. E não tirei tb o __GenGpf que queria faze-lo rodar primeiro antes de testar. Se apago a rotina o codigo vai normal. Tentei colocar no meu codigo, mesmo erro, e usei o exemplo postado, também da a mesma mensagem. Não vi nada no codigo que pareca fora do comum para gerar o erro... Estou achando que é alguma coisa com o include. Embora tenha lido o conteudo, parece estar normal tb. Pode ser alguma incompatibilidade com a versão. Alguém da uma help ai? Tenho tido bastante problema com os Gpf ultimamente, pois estou fazendo uns testes no sistema aqui. Abraços Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

citação:O que você usa de terceiros? citação:Eu tenho problema de memoria também com os sistemas que monto. id=quote>id=quote>e-mail: gilmer@fivewin.com.br msn: fivewinbrasil@hotmail.com id=quote>id=quote>De terceiros não uso nada. só xHarbour mesmo, o SQLRDD que vem com ele, e o FiveWin Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Eu tenho problema de memoria também com os sistemas que monto. Se o usuario fica muito tempo nele, abrindo e fechando a janela varias vezes, montando varias vezes telas diferentes, etc. A memoria consumida vai crescendo, mesmo depois de finalizar tudo eu matando os objetos. Isso principalmente em algumas telas que tenho + de 1 browse, e que conforme muda o registro de 1 atualiza o outro. Tento chamar o garbage colector do harbour + nao resolve nada. Só para aproveitar o topico xD Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Deve ter dado algum problema no envio, vou reenviar ele. /****/ Agora foi! http://www.fivewin.com.br/exibedicas.asp?id=992 Editado por - soares289 on 24/04/2009 16:01:13

Boa dia Anderson. Estava precisando de um desses também, então montei que para minha necessidade ficou bem pratico. Não está tao bonitinho quanto o da imagem, mas se quizer. Coloquei em dicas. http://www.fivewin.com.br/exibedicas.asp?id=991 Abraços Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Bom dia jef2_tim. Eu ja tentei usar o BTNBMP com png e não funciona. Na verdade, nunca consegui usar png em nenhum dos objetos do FiveWin, nem mesmo o TImage. Minha versão é a 7.05, não sei se nas que viram depois ja tem isso. Uma forma que você pode usar, é abrir a imagem com api do windows, ae setar direto a referencia dela no objeto, bem trabalhoso, ja vi um exemplo disso em algum lugar. Vou dar uma procurada, qq coisa posto aqui. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Olá Theotokos. Você ja tentou deixar a cor de fundo com a mesma cor da janela? Ae vai passar a impressao que está transparente. DEFINE MSGITEM OF oWndMain:oMsgBar BITMAP "BMP\\CADUSE.bmp" Prompt CRLF+cUsuario ACTION ( LerSenha() ); PIXEL SIZE Len(AllTrim(cUsuario))*6.5+28 TOOLTIP "Usuário logado no sistema" COLOR [Cor do Texto],[Cor de Fundo] Define uma cor para a janela, ou olha no fonte, qual cor ela por padrao, quando nao é informado um para ela, e use a mesma como cor de fundo do texto. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Eu também uso o cobrebem, e tem atendido bem a demanda. Mas no caso do nil. Pelo que vi, seu codigo usa como base para os calculos, alguns valores que o objeto oprn retorna. Ja tentou verificar se a configuração da impressora é igual para todos os micros? Tipo, folha padrao usada pela impressora, etc? E verifica se a resolução da tela está igual entre eles, não sei se a função cmtr2pix usa a resolução da tela como base. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Bom dia. Preciso montar um programa que compacte alguns arquivos em zip, e que tenha a opção de dividir os arquivos, em um determinado tamanho. Eu ja tenho programas que compactam e extraem arquivos zip, mas nunca antes tinha precisado dividir eles. Preciso poder, quando o arquivo zip chegar a um tamanho fixo, ele ser dividido, como os compactadores de arquivos fazem (ex> .zip .01 .02 .03... ) Peguei os fontes da hbzlib no site xharbour.org, é tudo em C++, e eu nao entendo muito de c++, mas vi algumas coisas sobre isso, só nao consegui usar. Codigo que estou usando para compactar os arquivos: METHOD Zipar( cFile, cDest ) CLASS DS_Zip Local aFiles, hZip hZip := ZipNew() if ::lUsePass ZipSetPassword( hZip , ::cPass ) endif ZipCreate( hZip, cDest , 0 ) if valType(cFile) == "A" ZipAddFiles( hZip, cFile ) else ZipAddFile( hZip, cFile ) endif ZipClose( hZip ) return Na hora de criar o zip, tentei colocar no terceiro parametro, a opção TDSPAN ( 2 ), mas da erro sempre. E tentei usar esse comando: HB_SETDISKZIP(hZip, ::nMaxSize ) nao surtiu efeito também ZipCreate( hZip, cDest , 0 ) Alguém ja usou isso e pode me ajudar? A documentação dessa lib( xhhbzip.lib ) é muito complicada de achar, e a que veio no proprio xhb é bem fraca. Obrigado, abraços. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Bom dia. Preciso montar um programa que compacte alguns arquivos em zip, e que tenha a opção de dividir os arquivos, em um determinado tamanho. Eu ja tenho programas que compactam e extraem arquivos zip, mas nunca antes tinha precisado dividir eles. Preciso poder, quando o arquivo zip chegar a um tamanho fixo, ele ser dividido, como os compactadores de arquivos fazem (ex> .zip .01 .02 .03... ) Peguei os fontes da hbzlib no site xharbour.org, é tudo em C++, e eu nao entendo muito de c++, mas vi algumas coisas sobre isso, só nao consegui usar. Codigo que estou usando para compactar os arquivos: METHOD Zipar( cFile, cDest ) CLASS DS_Zip Local aFiles, hZip hZip := ZipNew() if ::lUsePass ZipSetPassword( hZip , ::cPass ) endif ZipCreate( hZip, cDest , 0 ) if valType(cFile) == "A" ZipAddFiles( hZip, cFile ) else ZipAddFile( hZip, cFile ) endif ZipClose( hZip ) return Na hora de criar o zip, tentei colocar no terceiro parametro, a opção TDSPAN ( 2 ), mas da erro sempre. E tentei usar esse comando: HB_SETDISKZIP(hZip, ::nMaxSize ) nao surtiu efeito também ZipCreate( hZip, cDest , 0 ) Alguém ja usou isso e pode me ajudar? A documentação dessa lib( xhhbzip.lib ) é muito complicada de achar, e a que veio no proprio xhb é bem fraca. Obrigado, abraços. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Fala galera, tudo bem? Estou montando um novo sistema para um cliente aqui, e tem uma tela que tem 3 browses, quando meche no principal, atualiza os outros 2 automaticamente. Estva até hojê trabalhando com a versão 7.05 do FiveWin, com a do xHarbour .99.61, ae peguei a versao nova a um tempo, e resolvi instalar em uma maquina de teste aqui. Na versão anterior, funciona tudo perfeitamente, na versão + recente, logo ao abrir a janela, aparece só 1 registro no browse principal, e nos outros nao paarecem nada. Ae atualizo a tela, e o browse principal aparece os registros, ja os outros nao. Todos os 3 alias usados são abertos a partir de comando sql, e a filtragem tb está toda sendo feita por comandos sql direto. Ja verifiquei que os alias abertos possuem registros, mas por algum motivo nao aparece no browse. No browse principal, aparece os funcionarios ou os clientes, quando clica em um certo botão alterna entre os outros. E nos browses secundarios, aparecem os agendamentos e OS do cliente ou funcionario. Alguém ai ja teve problemas desse tipo? O codigo é meio grande, e depende muito do banco de dados para funcionar, então vou tentar montar um uma demostração dele funcionando, apra ficar mais claro o que está acontecendo. (Só amanhã, agora aqui está fechando ) Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Fala galera, tudo bem? Estou montando um novo sistema para um cliente aqui, e tem uma tela que tem 3 browses, quando meche no principal, atualiza os outros 2 automaticamente. Estva até hojê trabalhando com a versão 7.05 do FiveWin, com a do xHarbour .99.61, ae peguei a versao nova a um tempo, e resolvi instalar em uma maquina de teste aqui. Na versão anterior, funciona tudo perfeitamente, na versão + recente, logo ao abrir a janela, aparece só 1 registro no browse principal, e nos outros nao paarecem nada. Ae atualizo a tela, e o browse principal aparece os registros, ja os outros nao. Todos os 3 alias usados são abertos a partir de comando sql, e a filtragem tb está toda sendo feita por comandos sql direto. Ja verifiquei que os alias abertos possuem registros, mas por algum motivo nao aparece no browse. No browse principal, aparece os funcionarios ou os clientes, quando clica em um certo botão alterna entre os outros. E nos browses secundarios, aparecem os agendamentos e OS do cliente ou funcionario. Alguém ai ja teve problemas desse tipo? O codigo é meio grande, e depende muito do banco de dados para funcionar, então vou tentar montar um uma demostração dele funcionando, apra ficar mais claro o que está acontecendo. (Só amanhã, agora aqui está fechando ) Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Não pude ler as 3 paginas, aqui ta mow correria com a volta das ferias... Mas sou completamente a favor das providencias citadas pelo gilmer, quer usufruir dos beneficios da ferramenta, fassa de forma honesta. Nem é tão caro assim. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Eu ja tive o mesmo problema com importações de sistemas, e a logica que usei para pegar o campo endereço foi +- assim... Primeiro tiro todos os espaços extra do campo endereço, por que tinha casos que a tinha varios espaços entre o nome, etc. cEnde := Alltrim(cEnde) DO WHILE AT(' ',sqlStr) > 0 cEnde := STRTRAN(cEnde,' ',' ') ENDDO Depois, levando em conta, que um numero de endereço nunca passa dos 6 digitos cNumero := right(cEnde, 8) //2 a + por precaução e depois pego a parte numerica da string cTmp := '' for c=1 to len(cNumero) if substr(cNumero, c,1) $ "0123456789" cTmp += substr(cNumero, c,1) endif next O unico problema, é se junto com o endereço estiver o complemento, ae tme os casos tipo "etc, 9723 Ap. 13", ae nesse caso fica + chato, vc tem que verificar se na string tem algumas palabras mais comum, tipo bloco, ap, e remover aquela parte. E pode ainda no for que tira o numero da string, colocar uma verificação, para se tiver uma separação entre 1 numero e outro, vc interrompe o loop. Exemplo na string "etc, 453 ap. 321" assim q encontrar o " " apoz o 3, interreompe o loop, por que qualquer numero que vier em seguida já não lhe servira. E nesse caso precisaria retirar uma parte maior da String do endereço. Com isso eu consegui pegar quase que 100% dos endereços, montei uma rotina para fazer isso, ae na importação fazia Numero := getNumero(cEndereco) E resolve em casos como que usaram como exemplo "Av 9 de Julho, 973" Espero que ajude, abraços! Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Deixa queto, enquanto digitava aqui, pensei numa solução e resolvel... Só tirei o sr_setNextQuery na parte em que executo o comando sql para retornar em um array, tirei aquela linha e funcionou normal... Ainda acho isso errado dar um use e vir o alias que abri com conteudo diferente, mais pelo menos meu problema se resolve... perdi a manhã toda com isso =\. Foi mal pelo topico ^^ Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Bom dia pessoal. Estou com um problema, que na minha opnião é sinistro... Estou usando o SQLRDD e banco de dados MySQL e estou tendo o seguinte problema, eu abro uma tabela, mais o conteudo dela vem o de outra, na verdade o conteudo vem de uma tabela que nem existe. Segue um exemplo: use funcionarios new via "SQLRDD" ? alias() //<--- Retorna FUNCIONARIOS browse() //<--- Conteudo de um comando executado anteriormente O que consegui levantar aqui é o seguinte, em uma janela anterior a essa que estou abrindo, tenho que atualizar algumas informações na tela, os agendamentos do funcionario, e executo o comando... aRet := {{}} oCon := sr_getConnection() sql := 'select agecod, agedata from agenda where sr_deleted = " " and oscod = "' + codigo da OS + '"' sr_setNextQuery(sql) oCon:Exec(sql, .t.,.t., aRet) para quem não conhece, na variavel aRet, retorna um array bidimencional com o conteudo do select. Só que quando abro o alias funcionarios, o conteudo dele vem o resultado desse select executado na tela anterior. A unica coisa que resolveu foi abrir o alias, fecha-lo e abrir de novo, mais não estou satisfeito com isso :~~ Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP Editado por - soares289 on 27/11/2008 10:00:03

Bom dia pessoal. Estou com um problema, que na minha opnião é sinistro... Estou usando o SQLRDD e banco de dados MySQL e estou tendo o seguinte problema, eu abro uma tabela, mais o conteudo dela vem o de outra, na verdade o conteudo vem de uma tabela que nem existe. Segue um exemplo: use funcionarios new via "SQLRDD" ? alias() //<--- Retorna FUNCIONARIOS browse() //<--- Conteudo de um comando executado anteriormente O que consegui levantar aqui é o seguinte, em uma janela anterior a essa que estou abrindo, tenho que atualizar algumas informações na tela, os agendamentos do funcionario, e executo o comando... aRet := {{}} oCon := sr_getConnection() sql := 'select agecod, agedata from agenda where sr_deleted = " " and oscod = "' + codigo da OS + '"' sr_setNextQuery(sql) oCon:Exec(sql, .t.,.t., aRet) para quem não conhece, na variavel aRet, retorna um array bidimencional com o conteudo do select. Só que quando abro o alias funcionarios, o conteudo dele vem o resultado desse select executado na tela anterior. A unica coisa que resolveu foi abrir o alias, fecha-lo e abrir de novo, mais não estou satisfeito com isso :~~ Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP Editado por - soares289 on 27/11/2008 10:00:03

Nunca usei o sqllib, mais aqui onde trabalho usamos o SQLRDD. Não fasso ideia do preco ;~~ Quanto a funcionalidade, funciona muito bem, para converter codigos do dbf comum para o o sql, só colocar no inicio do codigo 'RddSetDefault( "SQLRDD" )' e dar os use normal. Ou no use colocar [ via "SQLRDD" ] A parte de conexão com o banco, ja testei com oracle, firebird, mysql e até MDB :s. Todos funcionarao normal. Executos comandos direto no banco, tem algumas rotinas que verificão funcoes e triggers no mysql, e cria elas em tempo de execução. Ja testei com ela tb multiplas conexões (mysql/mysql, mysql/firebird, mysql/oracle) também sem problemas. unica coisa que achei meio fraca na sqlrdd é que não tem muita documentação dela. A que vem na ferramenta é bem resumida, e não achei em nenhum outro lugar uma documentação BOA. Outra parte contra, é quanto ao commit. Em alguns lugares, muitos clientes usam o sistema ao mesmo tempo, e é muito complicado evitar registros duplicados. Por exemplo quando usa um replace, tem um certo delay até ser alterado efetivamente no banco de dados. Nesses casos, eu fasso inclusão, alteração e verificação direto com comandos sql, ae não fico dependendo do commit do harbour. Qualquer outra duvida só perguntar ai. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP

Boa Tarde Fatima. Bem vinda =] Comecei a poko tempo tb e no começo passava a maior parte do tempo lendo o codigo fonte do proprio fivewin pra saber como funcionava, e testando alguns exemplos. Rapidinho vc vê que aprendendo mecher com 1 objeto, os outros tudo são quase a mesma coisa, não é dificil não. E sempre pode contar com o pessoal do forum. Abracos. Coding 4Fun, 4Cash, 4Knowleage Carlson A. Soares - SP - SP email: soares_289@hotmail.com FiveWin 7.05 - xHarbour 0.99.61 - SQLRDD São Paulo - SP