Подписаться на RSS рассылку
Главная » Статьи по Delphi » Преобразования » Из шестнадцатеричного в десятичное

Из шестнадцатеричного в десятичное

Автор: Борисов Сергей

function HexToInt(hex: String): integer;
var s : string;
begin
  s := '$' + hex;
  result := StrToInt(s);
end;

Пример использования:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(HexToInt('FDF4')));
end;

Просмотров: 4546

Обсудить на форуме


Имя *:
Email:


Код *:

Copyright © 2008-2016 Программирование на Delphi для начинающих и не только

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации

Хостинг от uCoz

Автор проекта: Борисов Сергей

e-mail: save-x@yandex.ru

Связь с администрацией сайта