Функция ord в делфи

Функция ord в делфи

Delphi programming

Подписаться на рассылку:

показывает порядковый номер integer, character или enum

|| 1 function Ord ( Arg : AnsiChar | Char | WideChar | Enumeration | Integer ) : Integer;

|| 2 function Ord ( Arg : Int64 ) : Int64;

Описание:

Delphi функция Ord возвращает целое значение для любого порядкового типа.

Это используется, чтобы преобразовать символы или перечисления в их числовые эквиваленты.

Пример кода:

var
A : AnsiChar;
C : Char;
W : WideChar;
E : Boolean;
I : Integer;
I64 : Int64;

begin
// Set the ordinal type values
A := ‘A’;
C := ‘C’;
W := ‘W’;
E := True;
I := 22;
I64 := 64;

// And show the value of each
ShowMessage(‘A = ‘+IntToStr(Ord(A)));
ShowMessage(‘C = ‘+IntToStr(Ord(C)));
ShowMessage(‘W = ‘+IntToStr(Ord(W)));
ShowMessage(‘E = ‘+IntToStr(Ord(E)));
ShowMessage(‘I = ‘+IntToStr(Ord(I)));
ShowMessage(‘I64 = ‘+IntToStr(Ord(I64)));
end;

Результат выполнения:

A = 65
C = 67
W = 87
E = 1
I = 22
I64 = 64

Функция Ord( X ): Longint;

Описание
Функция возвращает порядковый номер (индекс) выражения перечислимого (кроме Int64) или символьного типа, переданного в параметре X. Если аргумент имеет перечислимый тип, то функция возвращает индекс элемента (1-й элемент имеет индекс 0). Если Х представляет собой значение типа Char, то функция возвращает ASCII код символа.

MyType = (x1, x2, x3, x4);

S:= ‘x3 имеет порядковый номер ‘+ IntToStr( Ord( x3 ))+ #13;
S:= S+ ‘ASCII код символа "Б" — ‘ + IntToStr( Ord( ‘Б’ ))+ #13;
S:= S+ ‘ASCII код символа "б" — ‘ + IntToStr( Ord( ‘б’ ));
MessageDlg( S, mtInformation, [mbOk], 0);

Поговорим о том, как представляют символы Delphi и какого типа данных они могут быть. Чтобы хранить и обрабатывать символы, используют переменные, имеющие тип данных Ansichar и wideChar:

  1. Тип данных Ansichar представляется в виде некоторого набора ANSI-символов, который содержит в себе символы, кодирующиеся одним байтом (байт – восьмиразрядное двоичное число).
  2. Типу данных wideChar соответствует набор символов с кодировкой Unicode, который включает в себя символы, кодирующиеся двумя байтами.
Читайте также:  Словарь переводчик яндекс текста

Чтобы обеспечить совместимость с предыдущими версиями, пользуются типом данных Char, который эквивалентен типу Ansichar. В качестве значения переменной, имеющей символьный тип, может выступать любой отображающийся символ:

  • какая-либо цифра,
  • какой-либо знак препинания,
  • любая буква русского или латинского алфавита,

а также специальный символ, к примеру, ‘новая строка’. Как полагается, переменная с символьным типом данных объявляется в разделе var (раздел объявления переменных). Общий вид инструкции объявления символов Delphi таков:

  • name – означает переменную с символьным типом данных;
  • char – специальное ключевое слово, которое обозначает символьный тип.

Пример 1.

family: char;

Как в случае любой переменной, переменная с символьным типом char приобретает значение в процессе выполнения инструкции присваивания. Допустим, если после того, как выполнена инструкция присваивания, переменная, имеющая тип char получает некоторое значение, то справа от знака присваивания := должно находиться выражение с типом char, к примеру, переменная с типом char, либо символьная константа – какой-либо символ, заключающийся в кавычках.

Пример 2. Пусть переменные a и b – переменные символьного типа. Как только выполнены инструкции

переменная a приобретает значение при помощи присваивания значения указанной константы, а переменная b – с помощью присваивания значения вышеупомянутой переменной a. Сравнение переменной с символьным типом char с какой-либо другой переменной, имеющей тип char, либо с символьной константой также возможно.

Это сравнение заключается в том, что каждому символу соответствует определенное число. Например, символ ‘о’ – меньшее число, чем символ У, символ ‘А’ – меньше число, чем символ ‘в’, символу V ставится в соответствие число меньше, чем а. В результате можно написать:

Как мы видим из исходного кода программы, основная работа выполняется при помощи процедуры обработки события OnActivate, формирующей и выводящей в поле метки (в нашем случае, Label1) необходимую таблицу. Событие OnActivate действует при активизации формы приложения. Вследствие этого, как только форма появилась на дисплее, происходит автоматическое выполнение процедуры TForm1.FormActivate. На рис. снизу представлен вид окна нашей программы:

Ссылка на основную публикацию
Фиксированная шапка сайта при прокрутке
Допустим у вас важная информация например контакты находятся в шапке и вы хотите что бы они всегда были на веду...
Удаление последнего элемента списка
Введение. Основные операции О дносвязный список – структура данных, в которой каждый элемент (узел) хранит информацию, а также ссылку на...
Удаление дубликатов фотографий на русском бесплатно
Здравствуйте Уважаемый Друг. У каждого из нас на компьютере хранится большое количество различных фотографий изображений и тому подобных картинок. Парой...
Фиксированное меню при скролле
Создаём эффект залипания при прокручивании страницы на блоках меню навигации, бокового виджета и меню с помощью jQuery и без него....
Adblock detector