Sign in Join
FPDoc Onlineexperiment

BCDToInt function

In unit sysutils

Convert a BCD coded integer to a normal integer.

Declaration

pascal
function BCDToInt(Value: Integer): Integer

Description

BCDToInt converts a BCD coded integer to a normal integer.

Errors

None.

See also

Example: ex64

pascal
Program Example64;

{ This program demonstrates the BCDToInt function }

Uses sysutils;

Procedure Testit ( L : longint);
begin
  Writeln (L,' -> ',BCDToInt(L));
end;

Begin
  Testit(10);
  Testit(100);
  TestIt(23);
End.

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.