Функція StrToInt в Delphi перетворює рядок з цілим значенням в Integer.
StrUtils unit
function StrToInt (IntegerString : string) : Integer;
Функція StrToIntконвертує рядок із цілим значенням IntegerString, такий як '123', у ціле Integer.
Вона підтримує позитивні та негативні значення, шістнадцяткові числа з префіксом $ або 0x.
Примітка.
Виняток EConvertError буде кинуто, якщо є помилки в IntegerString, типу кінцевих прогалин, десяткових точок, неприпустимих десяткових чи шістнадцяткових символів.
Функція StrToInt: Приклад перетворення десяткових та шістнадцяткових чисел
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
Функція StrToInt: Захоплення помилок перетворення рядка на ціле значення
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
Схожі функції та команди
Integer — основний тип цілого числа.
IntToStr — конвертує ціле число в рядок.
StrToInt64 — перетворює рядок з цілим значенням в Int64.
StrToInt64Def — перетворює рядок з цілим значенням на Int64, враховуючи значення за промовчанням.
StrToIntDef — перетворює рядок на значення з типом Integer, враховуючи значення за замовчуванням.
