evertonlb

Valeu cara...
Obrigado, deu certo!
Att.
Everton

cara.. me passa teu e-mail que te mando!

Cara, pode ate ser que não seja o mais indicado, mas o que eu fiz foi recortar o código que estava dento do DemoBoleto.PRG
para dentro da minha rotina que gera as contas e imprime os documentos..Já imprimia Carnês, agora fiz imprimir os boletos também..
Troquei os dados que são mandados no DemoBoleto.PRG, por variáveis que recebem os dados do meu software.
Não acrescentei #Include, nem #translate ou #define.
Acrescentei no meu script de compilação todos os PRG´s que vieram junto, menos, é claro, o DemoBoleto.prg e o Acento.prg, que troquei por aquele que te enviei.
Acrescentei no meu Script também o HarbourBoleto.CH.
Att.
Everton

Mas só com o PrintFileRaw()?? Não vai diretaço??
queria mandar direto pra porta, "quenem de antes"!.. bem moleza mesmo!!
att.
Everton

Ok.. não era bem isso que eu queria, mas já andei metade do caminho...
Tenho tela de listagem de clientes, produtos, fornecedores, etc.. que devem ser acessadas a qqer momento. Para que o accelerator funcione eu tinha que colocar elas no MENUITEM.... Então coloquei. só que estas listagens e consultas não abrem sobre uma DIALOG, só abrem se o software estiver na tela inicial... correto isso?
Então redesenhei as telas das listagens, e coloquei botões para acessar as outras funcionalidades que tenho dentro destas listagens... Ficou meio estranho, mas ao menos ta funcionando...
ANTES, no Clipper, era assim.:
Alt+F1 - Abir a listagem de clientes
Dentro da tela desta listagem, com TAB - listava as compras realizadas pelo cliente.
Com Enter - Abria os dados cadastrais dele
Com Ctrl+Enter - Adicionava informações no Memo.
Com Alt+C - Fazia uma pesquisa por CPF
Com Space - Pesquisava pelo nome da Mãe.
Com Alt+A - Adicionava um Alerta no cliente, que era verificado a cada operação feita.
E sempre voltava o Código do cliente. Se estivessemos numa tela de recebimento, o usuário achava o cliente e dava um ESC e transportava o código para a tela de recebimento.
Mas como falei.. por hora fica assim mesmo!
Obrigado a todos pela ajude e dicas.
Att. Everton

Obrigado Kapiaba...
Só consegui fazer funcionar usando o GetDefaultPrinter()
Colocando o "LPT2" que é a porta utilizada pela Argox, da o erro na OpenPrinter()..
A Argox não é a impressora padrão... por isso vai ter que funcionar digitando a porta...
Att.
Everton

Beto.. boa tarde cara...
Vamos nessa força amigo...
Eu me sentiria útil se você aceitasse um depósito no valor de uma lata de leite...
infelizmente é tudo que posso para o momento cara...
envie ai os dados para depósito
Att.
Everton

Poxa cara.. eu tinha esquecido do FileFind... Coisas da idade! hehehe
Veio sem o NLIB100.RTL, ai numa procura num HD velho achei a NLIB200.RTL e junto o FileFind.
Deu certinho.. coisas de alguns segundos pra alterar mais de 350 PRG´s
 
Ariston, a função só não deixa o cara alterar a data com o software em execução..
Na realidade atribuo a data na entrada do sistema a depois a uma variável, sempre que tiver que pegar a data atual eu pego esta variável..
O que acontece é que tenho um "cliente" que fica alterando a data do micro para que a senha não expire, ai entra no software e com ele aberto, acerta a data do micro! É duro de acreditar que um comerciante faça isso!!!
 
Obrigado pela força.