[Akzes]

с формами не могу разобраться....
у меня формы при необходимости
создаются такой конструкцией
к примеру...

Код:

try
    TToolButton(Sender).Tag := TagFormOpen;
    Application.CreateForm(TfmAddPO, fmAddPO);
    fmAddPO.ShowModal;
  finally
    fmAddPO.Free;
    TToolButton(Sender).Tag := TagFormClose;
  end;

при создании из разных мест возникает ошибка... пишет что то про адреса памяти...
проверку на то из под какой формы запускаем я делаю так

Код:

if fmList <> nil then

то тогда подружаем то что необходимо...
но все это не работает...
почему интересно?