Barfis

Jhonas, vlw pela dica vo testar a 2º. vlw. Abraço!

Bom dia pessoal estou com um problema na impressão de cupom não fiscal. Em um dos meus cadastros tenho a opção de indicar a porta que vou enviar a impressão, mas agora surgiu um problema um novo cliente comprou uma impressora Bematech MP-4000 TH (USB) e a porta dela é a que o instalador gera, meus relatórios feito no quick imprime normalmente, mas os meu cupom não fiscal não imprime, não da erro simples mente não faz nada. AssignFile(F, dmempresa5.tabempresaimpressora.Text); Rewrite(F); Writeln(F,#27#15 + ' Comprovante de venda. '); Writeln(F,'

Bom dia! Tenta assim: if (media >= media para aprovar) then begin edit7.text := 'Aprovado'; end else if (media < media para aprovar) and (media >= media para exame) then begin edit7.text := 'Exame'; end else if (media < media para exame) then begin edit7.text := 'Retido'; end;

Bom dia! Douglas_Soares obrigado pela dica, resolveu o meu problema :D . Mas agora tenho mais uma duvida, agora que estou trabalhando em rede achei um problema, quando efetua uma alteração no cadastro de produto e a tela esta aberta tanto no servidor como no terminal não atualiza, Ex.: Tenho um produto que tem 50 em estoque, e altero ele para 100 no servidor, no terminal não é feita essa alteração só se eu fechar e abrir a tela. Tenho esse problema também na situação inversa a alteração feita no terminal não atualiza o servidor.

Boa tarde galera! Estou com um problema com o meu sistema. O problema é o seguinte estou com um sistema em um servidor e em um terminal, no servidor esta instalado o firebird Server e no terminal o firebird cliente. No servidor o sistema abre normalmente, já no terminal ocorre um erro Project Projeto.exe raised exception class EUIBerror with message ‘unable to complete network request to host “192.168.0.101”. Failed to establish a connection. Uma tentativa de conexão falhou porque o componente conectado não respondeu corretamente após um período de tempo ou a conexão estabelecida falhou porq

Boa tarde galera. Gostaria de saber qual rotina para trabalhar com nota fiscal paulista. Desde já agradeço!

ae galera deu certo esse esquema so para complementa. quando a empressora estiver em rede é so usar: \\nome do servidor de impressora\ nome dea impressora. e se for impressora local: \\ip\nome da impressora. ou a porta q no meu caso foi LPT1 vlw pela ajuda. abraços para todos!

sim, mas não lembrei de falar esse campo é o endereço da impressora, no caso se eu utilisar o \\ip\impressora funciona, mas o micro do meu cliente não tem ip. mesmo eu colocando um ip não da certo esse é o problema sera q tem outra forma?

Boa tarde galera! Estou com um problema para imprimir comprovante de vendas meu cliente tem um micro em um mercado pequeno e precisa dessa impressão, o meu problema é que esta dando um erro de comunicação na impressão desse cupom, so no cupom pois os relatórios de apoio q eu fiz no quickreport imprime normal, so os do cupom não imprime segue o código. procedure Tformimprimir.Button1Click(Sender: TObject); VAR I:Integer; F : TextFile; VDATA : String; VHORA : String; imp : String; begin VDATA := '' + FormatDateTime ('dd"/"mm"/"yyyy',now); VHORA := timetostr (now

vlw! abraço.

Desculpa me expressei mal. A impressão é de comprovante de venda na lx300. essa que você me passou é para centralizar em folha A4? Abraço!

Jhonas não deu certo a impressao saiu do papel. abraços!

vlw Jhonas... amnha vo testar... abraço! :)

Boa tarde galera! Estou fazendo uma impressão onde o usuário personaliza o cabeçalho e o rodapé de um comprovante de venda, mesmo eu colocando o DBEdit centralizado e a opção Alignment = taCenter do campo desejado e continua imprimindo alinhado a esquerda, como faço para ele imprimir centralizado, a linha de código é essa : Writeln(F,#27#15+ '' + dmempresa5.cdsempresacabecalho.Text); Desde já agradeço. Felipe Buffalo.

muito obrigado! :) abraço!