Acho que não precisaria postar pois da pra mudar tudo em 10s usando o
Replace de String para AnsiString....

 

Mas to aqui pra ajudar no que puder Tb.

 

Valeu pessoal.

 

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: quarta-feira, 25 de agosto de 2010 18:33
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Delphi 2010 ta doido?
Prioridade: Alta

 

  

Poste as declarações que você usou no RAD Studio 2010! Assim você ajuda
aqueles outros colegas que tem (ou poderão vir a ter) o mesmo problema que
você, além de ser uma forma de ser grato à lista! Porque só o “‘venha a
nós’, e ‘ao vosso reino’ nada” é meio chato, não?

Sds.

De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
[mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
] Em
nome de Iran Lima
Enviada em: quarta-feira, 25 de agosto de 2010 12:51
Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> 
Assunto: RES: [delphi-br] Delphi 2010 ta doido?

Resolvido.

O problema era exatamente nas declarações.

Obrigado amigo.

De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
[mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
] Em
nome de Clairton
Enviada em: terça-feira, 24 de agosto de 2010 18:54
Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br> 
Assunto: Re: [delphi-br] Delphi 2010 ta doido?

a Declaração das funçoes tbm tem que estar com o Ansi...

function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao: 
AnsiString; Aliquota: AnsiString; TipoQuantidade: AnsiString; 
Quantidade: AnsiString; CasasDecimais: Integer; ValorUnitario: 
AnsiString; TipoDesconto: AnsiString; Desconto: AnsiString): Integer; 
StdCall; External 'BEMAFI32.DLL';

Att.:

Clairton Eloisio Müller

Em 24/08/2010 18:46, Iran Lima escreveu:
>
> Já tentei com pansichar....
>
> E nada.
>
> -----Mensagem original-----
> De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br> 
> <mailto:delphi-br%40yahoogrupos.com.br> 
> [mailto:delphi-br@yahoogrupos.com.br
<mailto:delphi-br%40yahoogrupos.com.br> 
<mailto:delphi-br%40yahoogrupos.com.br> 
<mailto:delphi-br%40yahoogrupos.com.br> 
> <mailto:delphi-br%40yahoogrupos.com.br>] Em
> nome de Roni Rodrigo
> Enviada em: terça-feira, 24 de agosto de 2010 18:27
> Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
> Assunto: Re: [delphi-br] Delphi 2010 ta doido?
>
> tenta converter em pansichar...
> ex:
> Bematech_FI_VendeItem(PAnsiChar(codigo), PAnsiChar(descricao),
> PAnsiChar(aliquota)...
>
> Em 24/08/2010 17:01, Iran Lima escreveu:
> > Gente to com um problema ao passar parâmetros strings no Delphi 2010 ,
> >
> > Exemplo: Se eu usar um SaveToFile(arquivo.txt) o arquivo gerado fica 
> nome
> > "a" sem extensão.
> >
> > Outro Exemplo ao chamar o método da Bemafi32.dll
> >
> > Bematech_FI_VendeItem( 'codigo', descricao, aliquota,
> >
> > sTipoQtde, FormatFloat('0', quantidade), iDecimal,
> >
> > FormatFloat('0.00',valorUnitario),
> >
> > sTipoDesconto, FormatFloat('0.00',0) );
> >
> > so vai a primeira letra de cada parâmetro
> >
> > 2010-08-24 16:53:57 - Parâmetros: 0|S|I|I|0|2|1|$|0 (Log da
> > impressora), no
> > Debug passa tudo blz mas a impressora recebe errado
> >
> > O que pode ser isso???
> >
> > [As partes desta mensagem que não continham texto foram removidas]
>
> ------------------------------------
>
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
> 

-- 

*"Inovação é o combustível do crescimento".*

*Clairton Eloísio Müller*
Depto. Desenvolvimento
E-mail: clair...@dessis.com.br <mailto:clairton%40dessis.com.br>
<mailto:clairton%40dessis.com.br>
<mailto:clairton%40dessis.com.br>
<mailto:clair...@dessis.com.br <mailto:clairton%40dessis.com.br>
<mailto:clairton%40dessis.com.br>
<mailto:clairton%40dessis.com.br> >
Site: http://www.dessis.com.br

*Dessis Sistemas de Gestão Empresarial*

Rua José Marangoni, 380 - Vila Nova Cx. Postal 417

CEP: 89259-500 - Jaraguá do Sul - SC

Fone/Fax: (0xx 47)3371-7842/3371-2640/3371-7144

[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]

Responder a