Como tirar vigula de um campo

Delphi

05/02/2003

bom dia
tenho um campo numerico e preciso tirar a virgula dela para enviar para uma impressora fiscal ..
ex
10,50
ficaria
1050

obrigado


Anonymous

Anonymous

Curtidas 0

Respostas

Navoid

Navoid

05/02/2003

texto := ´10,50´;
i := pos(´,´, texto);
delete(texto, I, ´);

até


GOSTEI 0
Robsonismael

Robsonismael

05/02/2003

use o comando copy e o comando format. Ex:

copy(format(´¬16.2f´,[valor]),1,13)
copy(format(´¬16.2f´,[valor]),15,2)


GOSTEI 0
Macsousa

Macsousa

05/02/2003

utilize a funcao DELETE e POS do delphi

var := ´10,50´

delete(var, pos( ´,´ , var), 1)


GOSTEI 0
Dor_poa

Dor_poa

05/02/2003

 


GOSTEI 0
Emir Neto

Emir Neto

05/02/2003

E se eu for deletar tudo que venha depois da vírgula, como faço????


GOSTEI 0
Emir Neto

Emir Neto

05/02/2003

Não é bem deletar, meu problema é:

Tenho um arquivo texto que tem:
Nome de um site | http://linkdosite.com.br

Queria que ele mostrasse em um listbox apenas o Nome do Site, mas que quando desse um duploclick no nome do site ele abrisse o site no web browser padrão.


GOSTEI 0
POSTAR