Клуб программистов

    Ключевое слово Begin в Delphi - начинает блок операторов.

     Пара begin-end ограничивает набор операторов. Вы можете поместить этот блок в любом месте вашего кода.

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

     Например:

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

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

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

var
   myChars : array[1..2] of char;
   myBytes : array[1..2] of Byte;
   i : Integer;

// The begin statement always starts the code part of a subroutine
Begin
   // Use a for block to assign to both arrays
   for i := 1 to 2 do
   Begin
      myChars[i] := Chr(i+64);
      myBytes[i] := i+64;
   end;

   // Use a for block to observe the contents
   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