String
06/02/2003
0
Boa tarde ..
eu tenho um campo numerico com com valores 12,98 exemplo, para mandar para a impressora eu tenho q mandar 1298
usei a função delete para extrair a virgula , mas da um erro [Error] Caixa.pas(520): Missing operator or semicolon
tá assim meu código
Preco:=DM.TbItemVALORUNI.asstring;
delete(Preco, pos( ´,´ , Preco), 1);
pensei em outra solução
pego o numero e multiplico por 100, dai extraiu os 3 ultimos caracteres tipo
ex
12,98 - multiplico por 100 fica 1298,00 tiro o ,oo e fico com o meu numero 1298, mas não sei como fazer isso ..
Como extraiu, tiro, deleto os ultimos 3 caracteres?!?!??!
Valeuuu
eu tenho um campo numerico com com valores 12,98 exemplo, para mandar para a impressora eu tenho q mandar 1298
usei a função delete para extrair a virgula , mas da um erro [Error] Caixa.pas(520): Missing operator or semicolon
tá assim meu código
Preco:=DM.TbItemVALORUNI.asstring;
delete(Preco, pos( ´,´ , Preco), 1);
pensei em outra solução
pego o numero e multiplico por 100, dai extraiu os 3 ultimos caracteres tipo
ex
12,98 - multiplico por 100 fica 1298,00 tiro o ,oo e fico com o meu numero 1298, mas não sei como fazer isso ..
Como extraiu, tiro, deleto os ultimos 3 caracteres?!?!??!
Valeuuu
Anonymous
Curtir tópico
+ 0
Responder
Posts
06/02/2003
Anonymous
Tente :
Preco:=inttostr(int(DM.TbItemVALORUNI.asFloat * 100));
Preco:=inttostr(int(DM.TbItemVALORUNI.asFloat * 100));
Responder
Clique aqui para fazer login e interagir na Comunidade :)