Eduardo Lima
não registrado
|
|
Postada em 10/07/2008 16:17 hs
Esta é a sua formula Dim PX As Currency, PY As Currency PH = 13 PW = 103 PicBarra 'é um label que desenho o código de Barra. ObjPrinter.PaintPicture PicBarra.Picture, PX, PY ', PW, PH E no cristal eu chamei o Só que quando eu chamo o PicBarra.Picture me aparece numero e não o desenho dos códigos de barras. O que eu devo fazer??? .Formulas(2) = "CodBarra = '" & PicBarra.Picture & "'"Obs: No crystal a função CodBarra é Branco. E eu quero lançar o PicBarra.Picture mas não me aparece em desenho e sim como numero.O que eu faço para aparecer o Código de Barras??? Desde já agradeço pela atenção e ajuda. |
|
|
|
|
|
Maxcim
|
GUARULHOS
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 11/07/2008 11:14 hs
Olá eduardo, este código que lhe passe é para uso com o printer e não irá funconar mesmo no Crystal vc deve montar o boleto no CR e inserir uma font ( tipo barras). não tenho aqui comigo nenhum exemplo d boleto com o Crystal, se encontrar algum envio a vc. |
|
|
|
Jose Roberto
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 31/07/2009 13:36 hs
Quando a fatura vem por e-mail, não aparece o código de barra. Aparece um avizo dizendo.
" Não foi possivel localizar ou criar a fonte "ECTpostnet". Alguns caracteres podem não serem exibidos ou impressos corretamente".
Pode me dizer o que devo fazer?
Obrigado
|
|
|
|
|
|
Postada em 31/07/2009 13:54 hs
Boa tarde.
Acredito que basta você instalar a fonte na pasta C:\Windows\Fonts que resolve. Vale tentar.
Até mais.
|
|
|
|
