П3. Процедуры и функции для работы со строками

 

Для работы со строками применяются следующие процедуры и функции (в квадратных скобках указываются необязательные параметры).

 

П3.1. Процедуры и функции для работы со строками
Function Concat(S1 [, S2,..., SN]: String)-. String;	Возвращает строку, представляющую собой сцепление строк-параметров S1. S2,..., SN
Function Copy(St: String; Index, Count: Integer): String;	Копирует из строки St Count символов, начиная с символа с номером Index
Procedure Delete(St: String; Index, Count; Integers;	Удаляет Count символов из строки St начиная с символа с номером Index
Procedure lnsert(SubSt: String; St, Index: Integer);	Вставляет подстроку SubSt в строку St начиная с символа с номером Index
Function Length(St: String): Integer;	Возвращает текущую длину строки St
Function Pos(SubSt, St: String): Integer;	Отыскивает в строке St первое вхождение подстроки SubSt и возвращает номер позиции, с которой она начинается. Если подстрока не найдена, возвращается ноль
Procedure SetLength(St: String; NewLength: Integer);	Устанавливает новую (меньшую) длину NewLength строки St, если NewLength больше текущей длины строки, обращение к SetLength игнорируется
П3.2 Подпрограммы npеобразования строк в другие типы
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, если число выходит из заданного диапазона Мin Мах
Function StrToTime(St: String): TDateTime;	Преобразует символы строки St во время
Procedure Val(St: String; var X; Code: Integer);	Преобразует строку символов St во внутреннее представление целой или вещественной переменной X, которое определяется типом этой переменной. Параметр Code содержит ноль, если преобразование прошло успешно, и тогда в Х помещается результат преобразования; в противном случае он содержит номер позиции в строке St, где обнаружен ошибочный символ, и в этом случае содержимое Х не меняется. В строке St могут быть ведущие и (или) ведомые пробелы
П3.3. Подпрограммы обратного преобразования
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: TFIoatFor-mat; Precision, Digits: Integer): String;	Преобразует вещественное значение Value в строку символов с учетом параметров Precision и Digits (см. пояснения ниже)
Function FormatFloat(Format: String; Value: Extended): String;	Преобразует вещественное значение Value в строку
Function lntToStr(Value: Integer): String;	Преобразует целое значение Value в строку символов
Function TimeToStr(Value: TDateTime): String;	Преобразует время из параметра Value в строку символов
Procedure Str(X [:-width [: Decimals]]; var St: String);	Преобразует число X любого вещественного или целого типа в строку символов St; параметры Width и Decimals, если они присутствуют, задают формат преобразования: Width определяет общую ширину поля, выделенного под соответствующее символьное представление вещественного или целого числа X, a Decimals -количество символов в дробной части (этот параметр имеет смысл только в том случае, когда Х – вещественное число)

 

ЛИТЕРАТУРА

 

 

1. Delphi 7. Учебный курс / С.И. Бобровский. – СПб.: Питер, 2004. – 736 с.

2. Программирование в среде Delphi: лабораторный практикум для студентов всех специальностей / Под ред. Синицына А.К. – Мн.: БГУИР, 1998.

3. Основы информатики и вычислительной техники. Методические указания и варианты контрольных работ для студентов заочного отделения специальности 250107 «Экономика и управление на предприятии». Фурунжиев Р.И., Силкович Ю.Н., Ероховец Т.В., Исаченко Е.М., Ротапринт БГАТУ, Мн.: 2002.

4. Программирование в Delphi. Методические указания к выполнению курсовой работы по дисциплине «Основы информатики и вычислительной техники» для студентов заочного обучения факультета предпринимательства и управления.. Фурунжиев Р.И., Ротапринт БАТУ, Мн.: 2003. – 39 с.

5. Программирование на языке Object Pascal в визуальной среде Delphi. Методические указания к выполнению курсовой работы. Фурунжиев Р.И., Ероховец Т.В., Львова О.М., БГАТУ, Мн.: 2004, – 46 с.