[Thrasher]

Если объявлять так:

Код:

procedure TForm1.FormCreate(Sender: TObject);

 Var variable:SomeTypes

  procedure xxx; 
    begin
      close;
    end;

 begin
   xxx;
 end;

то тогда будут доступны все методы и свойства класса. Если вызывать так

Код:

procedure xxx;
begin
close;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
xxx;
end;

то может возникнуть ошибка - неизвестно какой close вызывается