Uses Unit System
A função Abs converte o valor do parâmetro em um valor absoluto, ou seja, um número positivo.
Sintaxe da sua utilização:
Abs(Valor);
Ex:
procedure TForm1.Button19Click(Sender: TObject);var Vl : integer;begin
Vl:=Abs(-15); //Converte valores negativos para positivo
label6.Caption:=IntToStr(Vl);end;
Vl:=Abs(-15); //Converte valores negativos para positivo
label6.Caption:=IntToStr(Vl);end;
Nenhum comentário:
Postar um comentário