Показать сообщение отдельно
  #12  
Старый 16.08.2012, 13:17
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Aristarh Dark
Вообще-то InsertComponent проверяет наличие владельца.
В какой версии Delphi? У меня в Delphi 7 не проверяет:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  pn, pn2, pn3: TPanel;
begin
  pn:=TPanel.Create(nil);

  pn2:=TPanel.Create(nil);
  pn3:=TPanel.Create(nil);

  pn2.InsertComponent(pn);
  pn3.InsertComponent(pn);

  pn2.Free;
  pn3.Free;
end;
Выдаёт ошибку: Access violation at address 00000000. Read of address 00000000.
Ответить с цитированием