Veja se assim da certo:
referencia : string;
referencia:=FormatFloat('000.00',FrmExp.ADOQuery1.FieldbyName
('referencia').Value);
FormatFloat()
Em 04/04/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
>
> O q vc quer fazer com este codigo ????
>
> Se o valor q esta no campo é um FLOAT entao use apenas FloatToStr !!!
>
> Vc esta copiando um pedaço sumando o tamanho da string + o valor do campo.
>
> Explique o q vc quer !!!
>
>
>
> Eduardo Castro Alves
> Analista de Sistemas
>
> -----Original Message-----
> From: [email protected] [mailto:[EMAIL PROTECTED]
> On Behalf Of Cadanos
> Sent: terça-feira, 4 de abril de 2006 10:46
> To: grupo2
> Subject: [delphi-br] duvida
>
>
>
>
> Galera, como faria para formatar está linha para que o valor referencia
> seja 000,00.
> pois esta saindo 00040 (deveria 000,40).
>
> é uma exportação para txt.
>
> referencia : string;
>
>
> referencia:= copy(vzeros,1,(5-Length(floatTOSTR(
> FrmExp.ADOQuery1.FieldbyName('referencia').Value))))+floatToStr(
> FrmExp.ADOQuery1.FieldbyName('referencia').Value);
>
> Cadanos
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
