[Помидоркин]

Вопрос, у меня, довольно общий.
В функции (методе класса) несколько раз повторяется некое действие, логично вынести его в отдельную функцию:

Код:

function GetTag(Str: String; Tag: String):String;
var   p1, p2: Word;
begin
  . . .
end;

function TFB2Folder.GetAutorTitle(FileName: String):String;
var F: File of Byte;
     x: Byte;
     u, titleInfo: UTF8String;
begin 
   . . .     
 Result:= GetTag([параметр]; [параметр]);  
   . . .  
 Result:= Result+GetTag([параметр]; [параметр]); 
end;

но дело в том, что это некое действие повторяется только в этой функции (методе класса), в связи с чем возник вопрос: может ли метод быть помещен внутри другого метода. Дело в том, что несколько раз на форумах и в статьях по delphi наталкивался на странную конструкцию, что-то вроде (не ручаюсь за точное воспроизведение):

Код:

procedure SomeProc ;
var . . .
 . . .
begin // блок расположенный
. . . // внутри 
end; // основной процедуры
. . .
begin // реализация
. . . // процедуры SomeProc
end;

Вообще, объясните (если кто понял, что я имею ввиду ), что это за конструкция.