sandro1361303558

Márcio, bom dia tente a seguinte função: msgrun( "Aguarde leitura do arquivo", "Leitura de Arquivo", { || leitura_arquivo() } ) Function Leitura_Arquivo() Use Arquivo Alias Arquivo New do while ! Arquivo->(Eof()) // Seu processo arquivo->(dbSkip()) enddo Return .T. Nesse exemplo, a mensagem ficará centralizada na tela até que termine a execução da funcao "Leitura_Arquivo()"... Sandro Sanches Corrêa sandro_sanches@hotmail.com FWH 2.5 / xHarbour 0.99.3 / xMate 1.3

Gilmer / Gregório, se possível me enviar também a atualização de Fev/2005 no Email abaixo. Por favor, alterar também meu cadastro colocando o email abaixo como principal. Desde já agradeço ... Sandro Sanches Corrêa sandro_sanches@hotmail.com xHarbour 0.99.3 / FWH 2.5Nov / xMate

Pessoal, muito obrigado a todos e que Deus retribua a voces tudo que desejaram de bom a mim e a meu filho Lucas, abençoando a todos ... A emoção me toma as palavras nessa hora ... Obrigado a todos ...

Raimundo, seja bem vindo ao Forum !!!! Esqueça o que sabe sobre o sistema de coordenadas, pois, no Five eh totalmente diferente .... vc pode, inclusive, controlar por pixels, como sugere o nosso amigo Alexandre. Outra coisa, como você fala difícil !!! citação: inexorável ... Neófito ... id=quote>id=quote> vô ter que pegar o pai dos burros (Dic) pra saber !!! rsrsrsrs Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99 + FWH 2.5 + xMate 1.3

Hélio, com atrazo mais foi ... Desculpe a Demora, não pude entrar no Forum esses dias ... Abraços ... Sandro Sanches Corrêa sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Vai a sintaxe: msgrun( "Aguarde estabilização da balança", "Estabilização da Balança", { || Estab_balanca() } ) Sandro Sanches sandro_sanches@hotmail.com FWH 2.5 + xHarbour 0.99.3 + xMate 1.3

Olá Helio, Já vi essa PCLINK32 e, se for a fornecida pela Toledo, Requer HardLock para Trabalhar. P/ resolver esse problema, desenvolvi a rotina de coleta de pesagem para os Módulos Toledo 9091, 9094, 8530, 8510 usando protocolo P03 e transmissão modo Contínuo. Caso use o xHarbour 0.99, posso te enviar a rotina + Libs de acesso na porta serial. Abraços Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Valeu Evandro, essa dica foi 1000 !!!!! Funcionando beleza ... Sandro Sanches sandro_sanches@hotmail.com FWH2.5 + xHarbour 0.99.3 + xMate 1.3

Kleiton, faço tudo isso com OrdScope(), inclusive apresentação de registros em ListBox() ( Tipo NF -> Itens ) Segue Exemplo: use arquivo Alias Arq New index on str(Codigo,6) to indice set index to indice // Para filtrar os codigos entre 1 e 10 Arq->(dbSetOrder(1)) Arq->(OrdScope(0,str(1,6))) Arq->(OrdScope(1,str(10,6))) Arq->(dbGoTop()) do while ! Arq->(eof()) ? Codigo Arq->(dbSkip()) enddo // Para desligar o filtro Arq->(dbSetOrder(1)) Arq->(OrdScope(0,NIL)) Arq->(OrdScope(1,NIL)) Arq->(dbGoTop()) Arq->(dbCloseArea()) Sandro Sanches Corrêa sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Beleza Kapiaba, comigo está tudo bem, alias nunca esteve mau, só estou triste por algumas ironias que você fês com alguns integrantes do Forum e tomei a iniciativa de rebate-las. Você não deve desculpas somente a mim, mais, tudo bem, a consciência é de cada um. Abraços ... Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Pois é Kapiaba, você, pelo jeito vai no rumo do vento !!! Ainda a pouco queria discutir, agora diz pra fazer como quizer !!! Afina nas palavras e depois diz que ganha de todo mundo !!! Porque não ser humilde e me copiar fazendo o que você deve fazer, ou seja, se retratando com a comunidade e pedindo desculpas pelas ofenças, pois, aqui não é lugar de ironias e ofenças ... citação:Sandro -> OK Evandro, você tem razão. Eu só respondi alguns tópicos não técnicos por ter notado um tom irônico em algumas respostas. Me desculpe pelo ocorrido. id=quote>id=quote>Copie Kabiaba, não é feio não ... eh humilde ... Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

OK Evandro, você tem razão. Eu só respondi alguns tópicos não técnicos por ter notado um tom irônico em algumas respostas. Me desculpe pelo ocorrido. Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Nossa Kapiaba, vc está meio estressadinho né !!!! Porque será ? Seria porque andou levando umas porradas ? Acho que não !!! Já que você é novo no Forum !!! É ou não é ? Sendo tão novo você já tem "ALVO" aqui ? Trabalha rápido heim !!! Igualzinho ao seu amigo !!! Impressionante !!! Acho que vc devia ouvir seu próprio conselho, ou seja, se matar, pq nunca vi tanta semelhança entre duas pessoas assim ... Você e o João são tão parecidos !!!! Eu posto o tópico quando eu quizer e como eu quizer, não vou receber ordens de "Kapiau" ba nenhum ... E outra vez está dando uma de Juiz !!! Ô Kapiaba, deixa o Juiz apitar o Penalty, depois conta com ele tá ... Ah sim, já ia esquecendo, se o tópico foi excluído pelo João, porque você está querendo discutir ? Está tomando as dores do amigo ? Pergunta pro João, seu grande amigo, o conteúdo do tópico que ele vai saber te explicar que só se tratava de uma sugestão e que ele entendeu mau a colocação feita no tópico e que ele abusou do privilégio de Administrador perante todos os membros deste fórum, e que ele excluiu o tópico por ser um covarde e etc ...

Evandro, também tive esse problema e observei que, dentro do .rc, se vc colocar o ícone que quer na 1a. declaração de icones também dá certo .... Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Pôxa Kapiaba, pensei que, sendo amigo do João, não lhe custaria nada avisar ele, mais se tá difícil, então deixa. É que vocês sendo tão intimos, pelo visto, são almas gêmeas. Eu acho que se você se esforçar um pouco, consegue transmitir o recado por telepatia (ahahah). Como nosso amigo só retorna em Janeiro, vou esperar mais um pouco e, quando ele retornar, eu posto novamente o tópico. Pode contar comigo, no que puder ajudar, ajudarei ... PS: Penalty é o Juiz que define ( ahahah ) e brincadeiras, acho que é bom, torna o ambiente saudável. Abraços Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Bem vindo ao forum, Kapiaba, Pelo visto, você manja bem de FW. Pessoas como você, que usa os conhecimentos para ajudar o próximo, irá nos ajudar muito nesta comunidade. Pena que seu amigo João Karinha não entrou mais nessa comunidade, pois, ficou devendo umas explicações a todos, não deu mais satisfação e, pelo que me consta, excluiu um tópico de sugestões para a melhoria do fórum de título "Aos Administradores". O que ele não sabia é que eu tenho guardado parte do tópico, então, vou te pedir para avisar seu amigo para, se possível, retornar aquele tópico no fórum ou vou posta-lo novamente. Nem que ele não responda a última colocação, mais que, pelo menos, seja homem ao manter a opinião dos participantes do tópico. Desde já, agradeço ... Sandro Sanches sandro_sanches@hotmail.com xHarbour 0.99.3 + FWH 2.5 + xMate 1.3

Olá sdinfo, Não vejo outra forma a não ser a criação de indices (seja temporário ou não ). Caso voce utilize o indice CDX seria só criar o indice com a opção ASCENDING ou DESCENDING e selecionar o indice ao entrar no ListBox. Ex: #INCLUDE "Ord.ch" REQUEST DBFCDX RDDSETDEFAULT ( "DBFCDX" ) USE Arquivo NEW INDEX ON Arquivo->DataVenc TAG DataVenc1 TO indice ASCENDING INDEX ON Arquivo->DataVenc TAG DataVenc2 TO indice DESCENDING Arquivo->(OrdListAdd("Indice.cdx")) // Abre o indice Arquivo->( OrdSetFocus("DataVenc2") ) // Seleciona a Tag que será usada Observe que, neste exemplo, está sendo criado um único indice com várias "Tags" dentro do mesmo.

Marllon, já fis rotinas de acesso à leitor serial da Symbol, e tive problemas com as rotinas de comunicação serial do FiveWin ( a função Buildcommdcb() ou a SetCommState() deveria configurar a porta mas não o fes ) e a solução que encontrei foi utilizar a hbcomm.lib do Harbour. Estou enviando no seu e-mail a rotina de leitura de porta serial e a hbcomm.lib.

Sérgio, te conheço bem e sei que pra Papai Noel só falta cabelo e barba hehehe. Feliz Natal a todos e obrigado pela contribuição e cooperativismo que sempre esteve presente neste forum ... Sandro Sanches Corrêa FWH 2.5 + xHarbour 0.99.3 + xMate

Bom Dia Gilmer, tem como vc mandar essa versão de novembro/2004 do FWH 2.5 pra mim ? Desde já agradeço ... Sandro Sanches

Caro Robson, Para desabilitar a tecla vc deve chamar novamente o Setkey() setando p/ NIL, aí desabilita ... SetKey( VK_F6, NIL ) Abraços ... Sandro Sanches xHarbour 0.99 + FWH 2.5 + xMate

Amigos Fivewinners, como se pode observar, grande parte do pessoal ainda está com dúvida em relação a TOdbc(), inclusive eu. Moderadores e feras deste forum, for favor nos ajudem... Eu sei que tem algumas pessoas usando ListBox com o resultado de Querys do Banco dentro de Arrays. Mais até agora não sei como fazer isso .... Sandro Sanches xHarbour 0.99 + FWH 2.5 + xMate

Tiago, eu tive esse problema e, no meu caso, era a versão da nViewLib.DLL. No Dicas tem uma copia atualizada dessa DLL. Tenta atualizar e vê no que dá !!!! Abraços .. Sandro Sanches xHarbour 0.99 + FWH 2.5 + xMate

Moçada, boa tarde, Estou querendo montar um listbox com informações vindas direto da tOdbcDirect(), ou seja, montar um "Select" no banco de dados SqlServer e, com o retorno desse "Select", exibir as informações no ListBox. Seria possível fazer isso sem gerar arquivo DBF temporário ? Desde já agredeço ... Sandro Sanches Promissão-SP xHarbour 0.99 + FWH2.5 + xMate

Olá Adilson, seja bem vindo, mesmo não conhecendo muito, acredito poder ajudar em algumas ocasiões ... Abraços ... Sandro Sanches xHarbour 0.99 + FWH 2.5 + Bcc55