Справочник функций и процедур Delphi: Begin

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

Begin
Ключевое слово
Ключевое слово, которое начинает операторный блок unit
  
begin
  Statements
end

Delphi Sources

Описание
Ключевое слово Begin фундаментально для Delphi оно начинает операторные блоки.

Пара begin-end огорождает наборе инструкций. Вы в вашем код можете разместить такой блок везде.

Это особенно значимо в операторах if и for, даже если требуется только одна инструкция. Это подразумевает, простое добавление дополнительных инструкций.

Например:

if a = 7 then do
 Inc(b, a);

Лучше написать :

if a = 7 then do
begin
 Inc(b, a);
end;

для понимания.
Похожие команды
End  Ключевое слово, которое заканчивает операторные блоки

For  Начинает цикл, который выполняется конечное число раз

Function  Определяет подпрограмму, которая возвращает значение

Procedure  Определяет подпрограмму, которая не возвращает значение

Repeat  Повторяет инструкции, пока не выполнится условие завершения

While  Повторяет инструкции, пока выполнится условие продолжения

 
Пример кода : Некоторые примеры инструкции begin
var
  myChars : array[1..2] of char;
  myBytes : array[1..2] of Byte;
  i : Integer;

// Инструкция begin всегда начинает кодовую часть подпрограммы
Begin
  // Использование для блока for, чтобы назначить оба массива
  for i := 1 to 2 do
  Begin
    myChars[i] := Chr(i+64);
    myBytes[i] := i+64;
  end;

  // Использование для блока for, чтобы просмотреть содержание
  for i := 1 to 2 do
  Begin
    ShowMessage('myChars['+IntToStr(i)+'] = '+myChars[i]);
    ShowMessage('myBytes['+IntToStr(i)+'] = '+IntToStr(myBytes[i]));
  end;
end;
myChars[1] = A
myBytes[1] = 65
myChars[2] = B
myChars[2] = 66
 


Последние добавленные на сайт исходники

DeLiKaTeS Tetris (Тетрис)

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

 

Айболит (remote control)

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте