Строки символов

Строка – это тип данных, которому соответствует последовательность символов. При работе со строками оперируют понятиями имя строки, размер строки, символ, номер символа. Для идентификации положения отдельных символов строки, используют индексы. В качестве индексов строки в Object Pascal могут использоваться только целые числа. Нумерация символов в строке начинается с единицы.

В языке Object Pascal существует несколько разновидностей строк, но мы рассмотрим только один из них, аналогичный типу String в языке Pascal. Этот тип в языке Object Pascal имеет название ShortString - короткая строка. Вместо него можно использовать и название String, но следует иметь в виду, что оно будет соответствовать типу ShortString только в том случае, если включена директива компилятора {$H+}. В противном случае String интерпретируется компилятором как тип AnsiString - длинная строка. Но, если в объявлении типа после ключевого слова String в квадратных скобках следует число, определяющее максимальную длину строки (например, String[4]), то, независимо от директив компилятора, тип трактуется как короткая строка.

Данные типа ShortString представляют собой последовательности 8-битовых ANSI символов, количество которых может быть от 0 до 255. Длина строки в процессе работы программы может изменяться, но размер выделяемой памяти при этом не меняется и равен 256 байтов.

Начальный (нулевой) байт в выделенной памяти используется для хранения длины строки, в остальных хранятся символы строки. Если S – это строка типа ShortString, то Ord(S[0]), так же как и Length(S), возвращают длину строки.

Object Pascal поддерживает и подтипы типа ShortString, максимальная длина которых может быть меньше чем 255 символов. Требуемая максимальная длина строки задается в квадратных скобках после слова String. Например:

var MyString: String[10];

Эта запись равносильна такой:

type

Tstring10 = String[10];

var MyString: Tstring10;

Использование подтипов экономит память, так как для строки выделяется меньше места.

Если переменной такого типа присваивается строка большей длины, то она будет обрезана справа.

Объявление типа со спецификатором длины нельзя использовать в заголовках процедур, которые используют параметры такого типа. Ниже приведен пример объявления процедуры, которое приведет к появлению сообщения об ошибке компиляции.

procedure Check(S: string[20] ); // будет синтаксическая ошибка

Однако это не означает, что в процедуры нельзя передавать данные таких типов. Передавать такие данные можно, но предварительно следует определить соответствующий тип данных, а в объявлении процедуры для параметров использовать этот, предварительно объявленный, тип. Ниже приведен пример правильного объявления такой процедуры.

type

TString20 = String[20];

procedure Check(S: TString20);