2014-02-05
289
П3.4. Перечисляемый тип
П3.3.Символьный тип
Значением символьного типа является множество всех символов. Каждому символу приписывается целое число в диапазоне 0...255. Это число служит кодом внутреннего представления символа, его возвращает функция ord.
Для кодировки в Windows используется код. Первая половина символов ПК с кодами 0...127 постоянна и содержит в себе служебные коды и латинский алфавит. Вторая половина символов с кодами 128...255 меняется для различных шрифтов. Символы с кодами О... 31 относятся к служебным кодам. Если эти коды используются в символьном тексте программы, они считаются пробелами.
К типу Char применимы операции отношения, а также встроенные функции:
Chr (В) - функция типа Char, преобразует выражение В типа Byte в символ и возвращает его своим значением;
UpCase (СН) - функция типа Char, возвращает прописную букву, если СН - строчная латинская буква, в противном случае возвращает сам символ СН (для кириллицы возвращает исходный символ).
Перечисляемый тип задается перечислением тех значений, которые он может получать. Каждое значение именуется некоторым идентификатором и располагается в списке, обрамленном круглыми скобками.
|
|
|
Функции, поддерживающие работу с типами-диапазонами:
High (X) - возвращает максимальное значение типа-диапазона, к которому принадлежит переменная X;
Low (X) - возвращает минимальное значение типа-диапазона.
Тип дата - время определяется идентификатором TDateTime и предназначен для одновременного хранения и даты, и времени. Над данными типа TDateTime определены те же операции, что и над вещественными числами, а в выражениях этого типа могут участвовать константы и переменные целого и вещественного типов.
| Подпрограммы преобразования строк в другие типы т | |
| Function StrToCurr(St: String): Currency; | Преобразует символы строки St в целое число типа Currency. Строка не должна содержать ведущих или ведомых пробелов |
| Function StrToDate(St: String): TDateTime; | Преобразует символы строки St в дату. Строка должна содержать два или три числа, разделенных правильным для Windows разделителем даты (в русифицированной версии таким разделителем является «.») Первое число - день, второе – месяц, если указано третье число, оно задает год |
| Function StrToDateTime(St: String): TDateTime; | Преобразует символы строки St в дату и время. Строка должна содержать дату ивремя, разделенные пробелом |
| Function StrToFloat(St: String): Extended; | Преобразует символы строки St в вещественное число. Строка не должна содержать ведущих или ведомых пробелов |
| Function StrToInt(St: String): Integer; | Преобразует символы строки St в целое число. Строка не должна содержать ведущих или ведомых пробелов |
| Function StrToIntDef(St: String; Default: Integer): Integer; | Преобразует символы строки St в целое число. Если строка не содержит правильного представления целого числа, возвращается значение Default |
| Function StrToIntRange(St: String; Min, Max: Longint): Longint; | Преобразует символы строки St в целое число и возбуждает исключение ERangeError, если число выходит из заданного диапазона Mm Max |
| Function StrToTime(St: String): TDateTime; | Преобразует символы строки St во время |
| Procedure Val(St: String; var X; Code: Integer); | Преобразует строку символов St во внутреннее представление целой или вещественной переменной X, которое определяется типом этой переменной. Параметр Code содержит ноль, если преобразование прошло успешно, и тогда в Х помещается результат преобразования; в противном случае он содержит номер позиции в строке St, где обнаружен ошибочный символ, и в этом случае содержимое X не меняется. В строке St могут быть ведущие и (или) ведомые пробелы |
| Подпрограммы обратного преобразования | |
| Function DateToStr(Value: TDateTime): String; | Преобразует дату из параметра Value в строку символов |
| Function DateTimeToStr(Value: TDateTime): String; | Преобразует дату и время из параметра Value в строку символов |
| Procedure DateTimeToString (var St: String; Format: String; Value: TDataTime); | Преобразует дату и время из параметра Value в строку St |
| Function FormatDateTime (Format: String; Value: TDateTime): String; | Преобразует дату и время из параметра Value в строку символов |
| Function FloatToStr(Value: Extended): String; | Преобразует вещественное значение Value в строку символов |
| Function FloatToStrF(Value: Extended; Format: TFloatFor-mat; Precision, Digits: Integer): String; | Преобразует вещественное значение Value в строку символов с учетом параметров Precision и Digits (см. пояснения ниже) |
| Function FormatFloat(Format: String; Value: Extended): String; | Преобразует вещественное значение Value в строку |
| Function IntToStr(Value: Integer): String; | Преобразует целое значение Value в строку символов |
| Function TimeToStr(Value: TDateTime): String; | Преобразует время из параметра Value в строку символов |
Правила использования параметров функции FloatToStrF показаны ниже:
|
|
|
| Значение Format | Описание |
| fFfExponent | Научная форма представления с множителем еХХ («умножить на 10 в степени XX»). Precision задает общее количество десятичных цифр мантиссы. Digits - количество цифр в десятичном порядке XX. Число округляется с учетом первой отбрасываемой цифры: 3.1416Е+00 |
| ffFixed | Формат с фиксированным положением разделителя целой и дробной частей. Precision задает общее количество десятичных цифр в представлении числа. Digits - количество цифр в дробной части. Число округляется с учетом первой отбрасываемой цифры: 3,14 |
| ffGeneral | Универсальный формат, использующий наиболее удобную для чтения форму представления вещественного числа. Соответствует формату ffFixed, если количество цифр в целой части меньше или равно Precision, а само число - больше или равно 0,00001, в противном случае соответствует формату ffExponent: 3,1416 |
| ffNumber | Отличается от ffFixed использованием символа - разделителя тысяч при выводе больших чисел (для русифицированной версии Windows таким разделителем является пробел). Для Value = p* 1000 получим 3 141,60 |
| ffCurrency | Денежный формат. Соответствует ffNumber, но в конце строки ставится символ денежной единицы (для русифицированной версии Windows - символы «р.»). Для Value = p*1000 получим: 3 141,60р |
