Delphi-Help

StrToInt

Печать
Рейтинг пользователей: / 0
ХудшийЛучший 

StrToInt

Описание

function StrToInt ( IntegerString : string ) : Integer;

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

Она поддерживает положительные и отрицательные значения, шестнадцатеричные числа с префиксов $ или 0x.

Пример кода

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

Примечание

Исключение EConvertError будет брошено, если есть ошибки в IntegerString, типа конечных пробелов, десятичных точек, недопустимых десятичных или шестнадцатеричных символов.

 

Авторизация



Счетчики