Fórum Gerando arquivo txt com informações no formato Float #515536

01/04/2015

0

Olá, estou com um pequeno problema para gerar um relatório TXT, verifique o códigp:
while not ClientDataSet_estoque.Eof do
  begin
   Write( arq,AjustaStr(ClientDataSet_estoque.FieldByName('COD_PRODUTO').AsString,7)+
   FormatFloat('00.00',ClientDataSet_estoque.FieldByName('PRECO').AsFloat)+
   AjustaStr(ClientDataSet_estoque.FieldByName('QUANTI_ESTOQUE').AsString,7));
end;

Desta forma esta gerando normalmente, porém o campo ('QUANTI_ESTOQUE') esta sendo gerado junto ao campo ('PRECO'). Ai então tentei colocar assim, para definir o espaço com tamanho 7 entre os campos :
FormatFloat('00.00',ClientDataSet_estoque.FieldByName('PRECO').AsFloat,7)+

Então retorna o erro:
E2250 There is no overloaded version of 'FormatFloat' that can be called with these arguments
Alguém poderia me dar uma orientação ?
Jhon

Jhon

Responder

Post mais votado

02/04/2015

O que você quer é separar os 2 campos com uma String vazia?

FormatFloat('00.00',ClientDataSet_estoque.FieldByName('PRECO').AsFloat)+ '  ' +
   AjustaStr(ClientDataSet_estoque.FieldByName('QUANTI_ESTOQUE').AsString,7));

Gabriel Baltazar

Gabriel Baltazar
Responder

Gostei + 1

Mais Posts

03/04/2015

Jhon

Olá Baltazar, Vou fazer da forma que me passou. Imaginei que teria como especificar um espaço fixo entre os campos da mesma forma que fiz com o valor string,mas tranquilo, desta forma que me passou também funciona neste caso, obrigado pela atenção.
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar