Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Как подключить или отключить сетевой диск
   Категория: Интернет и Сети
  Компоненты ToolBar и PageScroller
   Категория: Компоненты
  Тpансляция ошибок в BDE
   Категория: Базы данных
  Дата изменения файла
   Категория: Файловая система
  Округление целого числа до 5
   Категория: Математика
  Программно скрыть MainMenu
   Категория: Компоненты
  Узнать установлена ли BDE
   Категория: Базы данных
  Как в Memo прокрутить текст
   Категория: Компоненты
  Получить версию программы VersionInfo
   Категория: Приложение

Delphi - Справочник: StrToInt64

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

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

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

//Пример кода : Преобразование десятичных и шестнадцатеричных чисел 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; Пример кода : Захват ошибок преобразования строки в целочисленное значение 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;

Результат:
A : 32
B : 100
C : -12
D : 30
E : -30
F : 120

'100 ' is not a valid integer value
'$FG' is not a valid integer value
Примечание:
Исключение EConvertError будет брошено, если есть ошибки в IntegerString, типа конечных пробелов, десятичных точек, недопустимых десятичных или шестнадцатеричных символов.

  << Вернуться