[PG81]

Здравствуйте!Такой вопрос
Есть главная MDI форма и много child форм.В главной есть свойство в котором лежат ссылки на дочерние формы типа TForm, но при закрытии дочерней формы переменная продолжает содержать ссылку на уже не существующую дочернюю форму.Можно ли как то сделать так чтобы при закрытии дочерней формы ссылка на нее автоматически обновлялась и при этом выполнять ряд еще дополнительных действий.Где-то слышал что нужно это реализовывать через TNotifyEvent, но не знаю как это сделать.Вобщем должно получиться взаимодействие что-то на подобии TDataSource и TDataSet, там тоже если удалить TDataSet, то ссылка на него в TDataSource обнуляется.Попытался разобраться в их взаимодействии, но что-то никак.
Я предполагаю что нужно создать новый класс дочерней формы чтобы она учитывала ссылки на себя в перекрытом методе Destroy обнулять ссылки.Вобщем подскажите пожалуйста!Буду благодарен.

[PG81]

Подсказали на SQL.RU

Код:

TMainForm = class(TForm)
private
  ChildFrm:Tform;
protected
  procedure Notification(AComponent: TComponent; Operation: TOperation); override;
...
procedure TMainForm.Notification(AComponent:TComponent; Operation:TOperation);
begin
  inherited Notification(AComponent, Operation);
  if (Operation = opRemove) and (AComponent = ChildFrm) then begin
    ChildFrm := nil;
  end;
end;

Admin: Теги и еще раз теги!