Основы языка Delphi

         

Безусловный переход



Безусловный переход

Инструкция GoTo

GoTo Метка;

Инструкция осуществляет переход к инструкции, перед которой стоит метка. Метка должна быть объявлена в разделе label.




Циклы



Циклы

Инструкция for

Вариант 1 (с увеличением счетчика):

for Счетчик:=НачальноеЗначение to КонечноеЗначение do begin

{ здесь инструкции } end;

Инструкции между begin и end выполняется (КонечноеЗначение - НачальноеЗначение) + 1 раз.


ЕСЛИ НачальноеЗначение > КонечноеЗначение, ТО инструкции между begin И

end не выполняются.

Примечание

Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.

Вариант 2 (с уменьшением счетчика)'.

for Счетчик:=НачальноеЗначение downto КонечноеЗначение do begin

{ здесь инструкции } end;

Инструкции между begin и end выполняется (НачальноеЗначение - КонечноеЗначение) + 1 раз.

Если НачальноеЗначение < КонечноеЗначение, то инструкции между begin и end не выполняются.

Примечание

Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.




Инструкции выбора



Инструкции выбора

Инструкция if

Вариант 1: if-then-else. if Условие then

begin

{ Инструкции, которые выполняются, ) { если условие истинно. } end else

begin

{ Инструкции, которые выполняются, } { если условие ложно } end ;

Вариант 2. if-then.

if Условие then

begin

{ Инструкции, которые выполняются, } { если условие истинно. } end;

Примечание

Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.




Инструкция case



Инструкция case

Вариант 1:

case Выражение of

Список1_Констант: begin

. { инструкции } end; Список2_Констант: begin

{ инструкции } end;

СписокJ_Констант: begin

{ инструкции } end; end;

Вариант 2.

case Выражение of

Список1_Констант: begin

{ инструкции } end;

Список2_Констант: begin

{ инструкции } end; СписокJ_Констант: begin

{ инструкции J} end; else

begin

{ инструкции } end; end;

Инструкции между begin и end выполняются, если значение выражения, записанного после case, совпадает с константой из соответствующего списка. Если это не так, то выполняются инструкции, находящиеся после else, между begin И end.

Примечание

Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.




Инструкция repeat



Инструкция repeat

repeat

{ инструкции } until Условие;

Сначала выполняются инструкции цикла, которые расположены между repeat и until. Затем вычисляется значение выражения Условие, и если оно равно False, то инструкции цикла выполняются еще раз. И так до тех пор, пока значение выражения Условие не станет равным True.




Инструкция while



Инструкция while

while Условие do begin

{ инструкции ) end;

Сначала проверяется Условие, если оно истинно, то выполняются инструкции между begin и end. Затем снова проверяется Условие. Если оно выполняется, то инструкции цикла выполняются еще раз. И так до тех пор, пока Условие не станет ложным.

Примечание

Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.




Массив



Массив

Объявление одномерного массива:

ИмяМассива: array [НижнийИндекс...ВерхнийИндекс] of ТипЭлементов;

Объявление двумерного массива:

ИмяМассива: array [НижнийИндекс1..ВерхнийИндекс1,

НижнийИндекс2..ВерхнийИкдекс2] of ТипЭлементов;




Объявление функции



Объявление функции

function ИмяФункции(var Параметр1: Тип 1; var Параметр2: Тип2;

var ПараметрJ: TиnJ ) : Тип; const

{ описание констант } var

/ описание переменных } begin

{ инструкции функции }

Result:=Значение; end;

Примечание

Слово var ставится перед именем параметра в том случае, если параметр используется для возврата значения из функции в вызвавшую ее программу.




Объявление процедуры



Объявление процедуры

procedure ИмяПроцедуры(var Параметр1: Тип1;

var Параметр2: Тип2;

var ПараметрJ: TипJ } ; const

{ описание констант }

var

{ описание переменных } begin

{ инструкции процедуры } end;

Примечание

Слово var ставится перед именем параметра в том случае, если параметр используется для возврата значения из функции в вызвавшую ее программу.




Основные типы данных



Основные типы данных

К основным типам данных языка Delphi относятся: П целые числа (integer); П дробные числа (real); П символы (char);

строки (string);
логический тип (boolean).

Целые числа и числа с плавающей точкой могут быть представлены в различных форматах (табл. П1.1 и П2.2).



Стандартные функции и процедуры



Стандартные функции и процедуры

При описании функций и процедур приняты следующие обозначения:

имена функций и процедур выделены полужирным;
формальные параметры изображены курсивом. В качестве параметра могут использоваться константы, переменные или выражения соответствующего типа. Если параметром обязательно должна быть переменная, то перед ним поставлено слово var. После параметра через двоеточие указывается его тип;
после списка параметров функций через двоеточие указан тип результата, возвращаемого функцией.

В табл. П1.3 приведены описания математических функций языка Delphi.



Строки



Строки

Объявление переменной-строки длиной 255 символов:

Имя:string;

Объявление переменной-строки указанной длины:

Имя:string [ ДлинаСтроки ].




Структура модуля



Структура модуля

Модуль состоит из последовательности разделов. Каждый раздел начинается ключевым словом и продолжается до начала следующего раздела.

unit ИмяМодуля;

interface // раздел интерфейса

{ Здесь находятся описания процедур и функций модуля, коч-орые могут использоваться другими модулями. )

const // раздел объявления констант

{ Здесь находятся объявления глобальных констант модуля, которые могут использоваться процедурами и функциями модуля.}

type // раздел объявления типов

{ Здесь находятся объявления глобальных типов модуля,

которые могут использоваться процедурами и функциями модуля }

var // раздел объявления переменных

{ Здесь находятся объявления глобальных переменных модуля, которые могут использоваться процедурами и функциями модуля }

implementation // раздел реализации

{ Здесь находятся описания (текст) процедур и функций модуля)

end.




П1 1 Целые числа



Таблица П1.1. Целые числа

Формат

Диапазон

Shortint

-128.. 127

Integer

-32 768.. 32 767

Longint

-2 147 483 648.. 2 147 483 647

Byte

0..255

Word

0..65535



П1 2 Числа с плавающей точкой



Таблица П1.2. Числа с плавающей точкой

Формат

Диапазон

Кол-во значащих цифр

Real

2,9e-39.. 1,7e38

11-12

Single

1,5e-45.. 3,4e38

7-8

Double

5,0e-324.. 1,7e308

15-16

Extended

3,4e-4932.. 1,1e4932

19-20



П1 3 Математические функции



Таблица П1.3. Математические функции

Функция

Описание

Abs (Выражение)

Абсолютное значение аргумента (целый или вещественный тип)

Sqr (Выражение)

Квадрат аргумента (целый или вещественный тип)

Sqrt( Выражение: real) :real

Квадратный корень аргумента

Sin (Выражение: real) : real

Синус

Cos (Выражение: real) : real

Косинус

Arctant Выражение: real) : real

Арктангенс

Exp( Выражение: real) :real

Экспонента

Ln ( Выражение : real ) : real

Натуральный логарифм

В табл. П1.4 приведены описания преобразований языка Delphi.



П1 4 Преобразования



Таблица П1.4. Преобразования

Преобразование

Описание

Int( Выражение: real) :real

Целая часть

Trunc (Выражение: real) : longint

Целая часть

Round (Выражение: real) : longint

Округление к ближайшему целому

IntToStr (Выражение)


Преобразование числового выражения цело-

го типа в строку

FloatToStr (Выражение)

Преобразование вещественного числа в его изображение

FloatToStrF ( Выражение, Формат, Точность, КоличествоЦифр)

Преобразование вещественного числа в его изображение с возможностью выбора способа изображения

StxToInt ( Строка : string)

Преобразование строки, изображающей целое или вещественное число, в число

StrToFloat ( Строка : string)

Преобразование строки, изображающей вещественное число, в число

В табл. 1.5 приведены описания функций работы со строками и символами.



П1 7 Работа со строками и символами



Таблица П1.7. Работа со строками и символами

Строковая функция

Описание

Concat( Строка1: string, ... , Строкам: string) : string

Copy ( Строка : string , НомерСимвола : integer, Длина: integer) : string

Delete (var Строка :srting, НомерСимвола : integer, Сколько : integer)

Length (Строка: string) : integer Pos (Строка: string, Подстрока: string) :byte Chr ( КодСимвола : byte )

Объединение нескольких строк в одну

Выделение подстроки

Удаление части строки

Длина строки Позиция подстроки в строке Символ с указанным кодом



Запись



Запись

Вариант 1. Объявление записи в разделе переменных: Запись: record Поле1:Тип1; Поле2: Тип2;

ПолеJ: TиnJ; end;

Вариант 2. Сначала объявляется тип-запись, затем — переменная-запись:

type

ТипЗапись = record Поле1: Тип1; Поле 2:Тип2;

ПолеК: ТипК; end;

var

За пись: ТипЗапись;




Зарезервированные слова и директивы



Зарезервированные слова и директивы

Зарезервированные слова:

and

File

not

then

array

For

object

to

asm

function

of

type

begin

Goto

or

unit

case

If

packed

until

const

implementation

procedure

uses

constructor

In

program

var

destructor

inherited

record

while

div

inline

repeat

with

do

intenface

set

xor

downto

Label

shl


else

Mod

shr


end

Nil

string


Директивы:

absolute

assembler

external

Far

forward

interrupt

near

private

public

virtual