1 begin
2  //Другие операторы
end 

Операторы, размещенные внутри составного оператора, разделяются точкой с запятой. Никаких ограничений на состав операторов и количество уровней вложенности не накладывается.

Пример

1begin 2 Result := LCurrentValue; 3 Exit; 4end;