область видимости переменных?

Шебеко Евгений

void spawn_form()
{
TForm fm=new TForm(Form1);
fm.ShowModal();
delete fm;
}

{
spawn_form();
spawn_form();
spawn_form();
}

Падает.
FS 1.3 компилирован на BC6

Вообще интересные эффекты возникают, например:

void fdgdfg()
{
TFileStream fs=new TFileStream("my_file",fmOpenRead);
delete fs;
}

Файл открывается даже если я вообще не вызываю эту функцию.

AlexTZ

А у меня на 1.4 ничего не падает и файл не открывается
ЗЫ: уже отдал на выкладывание, на этой-следующей неделе будет.