Справочник функций и процедур Delphi: StrToInt64

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

StrToInt64
Функция
Преобразует строку с целым значением в Int64 SysUtils unit
  function StrToInt64 ( IntegerString : string ) : Int64;

Delphi Sources

Описание
Функция StrToInt64 конвертирует строку с целым значением - IntegerString, такую как '123', в целое Int64.

Она поддерживает положительные и отрицательные значения, шестнадцатеричные числа с префиксов $ или 0x.
Примечания
Исключение EConvertError будет брошено, если есть ошибки в IntegerString, типа конечных пробелов, десятичных точек, недопустимых десятичных или шестнадцатеричных символов.
Похожие команды
Int64  64 битовое целое число - наибольшее в Delphi

IntToStr  Конвертирует целое число в строку

StrToInt  Преобразует строку с целым значением в Integer

StrToInt64Def  Преобразует строку с целым значением в Int64, учитывая значение по умолчанию

StrToIntDef  Преобразует строку с значение с типом Integer, учитывая значение по умолчанию

 
Пример кода : Преобразование десятичных и шестнадцатеричных чисел
var
  A, B, C, D, E, F : Int64;

begin
  A := 32;
  B := StrToInt64('100');    // строка '100' преобразуется в целочисленное 100
  C := StrToInt64('  -12');  // Начальные пробелы игнорируются
  D := StrToInt64('$1E');    // Шестнадцатеричные значения начинаются с '$'
  E := StrToInt64('-0x1E');  // ... или с '0x'
  F := A + B + C + D + E;  // Складываем все эти целые числа

  ShowMessage('A : '+IntToStr(A));
  ShowMessage('B : '+IntToStr(B));
  ShowMessage('C : '+IntToStr(C));
  ShowMessage('D : '+IntToStr(D));
  ShowMessage('E : '+IntToStr(E));
  ShowMessage('F : '+IntToStr(F));
end;
A : 32
B : 100
C : -12
D : 30
E : -30
F : 120
 
Пример кода : Захват ошибок преобразования строки в целочисленное значение
var
  A : Int64;

begin
  // Мы перехватим конверсионные ошибки
  try
    A := StrToInt64('100 ');    // Конечные пробелы не поддерживаются
  except
    on Exception : EConvertError do
      ShowMessage(Exception.Message);
  end;

  try
    A := StrToInt64('$FG');    // 'G' - недопустимая шестнадцатеричная цифра
  except
    on Exception : EConvertError do
      ShowMessage(Exception.Message);
  end;
end;
'100 ' is not a valid integer value
'$FG' is not a valid integer value
 


Последние добавленные на сайт исходники

Animation Loaders

DeLiKaTeS Tetris (Тетрис)

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

 

Patch Maker

Айболит (remote control)

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

 

Copyright © 2004-2026 "Delphi Sources" by «SiteAnalyzer» (источник – "DelphiBasics")

Группа ВКонтакте