casas decimais

12/05/2003

2

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

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;

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

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar