Delphi справочник - Форум программистов - Навигация  
 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      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  
Подписаться на рассылку:
Клуб программистов


Основы Delphi
StrToInt
Функция
Преобразует строку с целым значением в Integer SysUtils unit
  function StrToInt ( IntegerString : string ) : Integer;
Описание
Функция StrToInt конвертирует строку с целым значением - IntegerString, такую как '123', в целое Integer.

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

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

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

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

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

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

begin
  A := 32;
  B := StrToInt('100');    // строка '100' преобразуется в целочисленное 100
  C := StrToInt('  -12');  // Начальные пробелы игнорируются
  D := StrToInt('$1E');    // Шестнадцатеричные значения начинаются с '$'
  E := StrToInt('-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 : Integer;

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

  try
    A := StrToInt('$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
 



© Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки  |     |  Английская версия