casas decimais
12/05/2003
0
como retiro somente as casas decimais de um currency. Ex: de 0,25 somente o 25 sem nem vírgula nem nada a mais
Salupe
Curtir tópico
+ 0
Responder
Posts
12/05/2003
Leorrn
Aí vai um procedimento q faz isso:
procedure TForm1.BitBtn1Click(Sender: TObject);
var temp: string;
begin
temp:= FormatCurr(´.#´, 0.25);
Label1.Caption := Copy (temp,2, length(temp));
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
var temp: string;
begin
temp:= FormatCurr(´.#´, 0.25);
Label1.Caption := Copy (temp,2, length(temp));
end;
como retiro somente as casas decimais de um currency. Ex: de 0,25 somente o 25 sem nem vírgula nem nada a mais
Responder
Clique aqui para fazer login e interagir na Comunidade :)