BCDToInt

Convert a BCD coded integer to a normal integer.

Declaration

Source position: sysstrh.inc line 248

function BCDToInt(

Value: Integer

):Integer;

Description

BCDToInt converts a BCD coded integer to a normal integer.

Errors

None.

Example

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(1000);
End.

Notes

 No notes exist for this page yet.