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

ОБРАЩЕНИЕ

НАЗНАЧЕНИЕ

Copy(St;Index;Count)

Копирует Count символов из строки St, начиная с символа с номером Index

Delete(St;Index;Count)

Удаляет Count символов из строки St, начиная с символа с номером Index

Length(St)

Возвращает текущую длину строки St

Pos(SubSt;, St)

Отыскивает в строке St первое вхождение подстроки SubSt и возвращает номер позиции, с которой она начинается. Если подстрока не найдена, возвращается ноль

UpperCase(S)

Возвращает исходную строку S, в которой все строчные латинские буквы заменены на заглавные (AnsiUpperCase – для русских букв)

ПОДПРОГРАММЫ ПРЕОБРАЗОВАНИЯ СТРОК В ДРУГИЕ ТИПЫ И обратного преобразования

StrToFloat(St)

Преобразует символы строки St в вещественное число. Строка не должна содержать ведущих или ведомых пробелов

StrToInt(St)

Преобразует символы строки St в целоечисло. Строка не должна содержать ведущих или ведомых пробелов

Val(St;X;Code)

Преобразует символы строки St во внутреннее представление целой или вещественной переменной Х, которое определяется типом этой переменной. Параметр Code содержит ноль, если преобразование прошло успешно, и тогда в Х помещается результат преобразования, в противном случае он содержит номер позиции в строке St, где обнаружен ошибочный символ, и в этом случае содержимое Х не меняется. В строке St могут быть ведущие и/или ведомые пробелы

Trim(St)

Возвращает строку-аргумент St без обрамляющих ее пробелов(ведущих и ведомых)

FloatToStr(x)

Преобразует вещественное значение Х в строку символов

IntToStr(x)

Преобразует целое значение Х в строку символов

ФУНКЦИИ ДЛЯ РАБОТЫ С ДАТАМИ и временем

Date

Возвращает текущую дату

DateToStr(D)

Преобразует дату в строку символов

DateTimeToStr(D)

Преобразует дату и время в строку символов

Time

Возвращает текущее время

TimeToStr(T)

Преобразует время в строку символов

НАЗВАНИЕ

ФОРМА ЗАПИСИ

ПРИМЕР

Присваивания

• <имя переменной>:=<выр-е>;

A:=25; C:=A;

Составной оператор (операторные скобки)

BEGIN Оп.1; Оп.2; Оп.3 END;

После do, then, else, если надо выполнить больше 1 оп-ра

Условный оператор

IF <условие> THEN <оп.1> ELSE <оп.2>;

If x>10 then a:=5 else a:=10;

Неполный условный оператор

IF <условие> THEN <оп.1>;

If r<=25 then s:=0;

Оператор цикла (шаг=1). Число повторений известно

FOR <параметр цикла>:=<нач.знач.> TO <конеч.знач.> DO <оп.1>;

For i:=1 to 5 do a[i]:=b[i];

Оператор цикла (шаг= -1). Число повторений известно

FOR <параметр цикла>:=<нач.знач.> DOWNTO <конеч.знач.> DO <оп.1>;

For i:=5 to 1 do a[i]:=b[i];

Оператор цикла с предусловием

Число повторений неизвестно

WHILE <условие> DO <оп-р>;

x:=1; While x<=8 do begin b[i]:=a[i]; x:=x+2 end;

Оператор цикла с постусловием Число повторений неизвестно. Нач. значение параметра цикла можно вычислять в теле цикла

REPEAT <тело цикла> UNTIL <условие>;

Выход из цикла по TRUE

i:=1; Repeat S:=s+a[i]; i:=i+5; e:=a[i]/100 until e>1.5

Оператор перехода и метки

GOTO <метка> ;

Label 10; …goto 10; … 10: <оп.1>

Оператор выбора

CASE <ключ выбора> OF <список выбора>

[ ELSE <оп-ры>] END;

A:= 2;

Case A of

1: i:=1;

2: i:=5;

end;

Процедура ввода данных

= данные вводятся с одной строки, список через запят.

= ввести и перейти на след. строку

= переход к новой строке (без ввода)

READ ( [<файл. перем>,] <список ввода>);

READLN ([<файл. перем>,] <список ввода>);

READLN;

Ввод из файла F

Read (F, a, b, c);

F –файл входной, ввод 3-х перем-х a,b,c

Readln (a, b, c, d ) – ввод 4-х переменных с клавиатуры, каждая перем. на своей строке (клавиша Enter )

Процедура вывода данных

=данные выводятся на одной строке

= вывести и перейти на след. строку

= переход к новой строке (без вывода)

WRITE ([<файл. перем>,] <список вывода>);

WRITELN ([<файл. перем>,] <список вывода>);

WRITELN [(<файл. перем>)];

Вывод в файл F или на экран

Write (F, ‘результат’,a, b:6:2);

Writeln (‘суммы=’,S1,’ ‘,S2);

a, S1, S2 - целые числа, b – вещественное число (всего 6 позиций, две после запятой) в апострофах – текст, пробелы, они выводятся, как пишутся

Оператор присоединения

WITH<переменная>DO<оператор>

Работа с записями