Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Get number digits

    Delphi
    by Union, 12. Dez 2013
  Not performant, but working:
  function GetDigit(Number : int64; Index : byte) : byte;
  var
  NumStr : string;
  begin
  NumStr := IntToStr(Number);
  // Index starts with 0 from the right
  result := StrToInt(copy(NumStr, length(NumStr)-Index, 1));
  end;