Всем привет. Подскажите пожалуйста в чем моя ошибка. Есть главная форма на ней располагаются кнопки при нажатии на которые происходит переход в этой же форме в другую. То есть на Главной форме я привязал Panel и на ней открывается та форма которая привязана к кнопке. У меня при закрытии программы вылезает ошибка которая ругается на строчку в скрипте:
procedure frmStart_OnResize (Sender: TObject; Action: string);
begin
1 frmForm1.Left:=frmStart.Panel4.Left;
2 frmForm1.Top:=frmStart.Panel4.Top;
3 frmForm1.Width:=frmStart.Panel4.Width;
4 frmForm1.Height:=frmStart.Panel4.Height;
5 frmForm2.Left:=frmStart.Panel4.Left;
6 frmForm2.Top:=frmStart.Panel4.Top;
7 frmForm2.Width:=frmStart.Panel4.Width;
8 frmForm2.Height:=frmStart.Panel4.Height;
frmForm3.Left:=frmStart.Panel4.Left;
frmForm3.Top:=frmStart.Panel4.Top;
frmForm3.Width:=frmStart.Panel4.Width;
frmForm3.Height:=frmStart.Panel4.Height;
frmForm4.Left:=frmStart.Panel4.Left;
frmForm4.Top:=frmStart.Panel4.Top;
frmForm4.Width:=frmStart.Panel4.Width;
frmForm4.Height:=frmStart.Panel4.Height;
frmForm5.Left:=frmStart.Panel4.Left;
frmForm5.Top:=frmStart.Panel4.Top;
frmForm5.Width:=frmStart.Panel4.Width;
frmForm5.Height:=frmStart.Panel4.Height;
end;
procedure frmStart_Button8_OnClick (Sender: TObject; var Cancel: boolean);
begin
frmForm1.Parent:=frmStart.Panel2;
frmForm1.Show;
frmForm1.button7.Click;
end;
Проблема в точ что когда ты открываешь программу и переходишь на любую форму и при закрытии программы вылетает ошибка:
Access violation at adress 0054FF39 in module "Uchet.exe". Read of adress 00000000 Script position : 3:3
Может кто подскажет ?