Текущий архив: 2006.12.10;
Скачать: CL | DM;
Вниз
Ошибка при уничтожении формы. Найти похожие ветки
← →
Jimmy (2006-11-23 14:46) [0]Есть две формы: Form1, материнская MDI-форма, которая создается в Project1.dpr, на ней Button1. Есть Form2, дочерняя MDI-форма, которая создается динамически, на ней Button2.
Код формы 1:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2:=TForm2.Create(Application);
end;
Код формы 2:
procedure TForm2.Button2Click(Sender: TObject);
begin
Form2.Free;
end;
Кликаю на Button1, создается форма 2, кликаю на Button2, возникает ошибка. Иногда не с первого, а со второго раза. Почему? Заранее спасибо.
← →
RASkov (2006-11-23 14:52) [1]procedure TForm2.Button2Click(Sender: TObject);
begin
Close;
end;
а на OnClose - Action = caFree
Страницы: 1 вся ветка
Текущий архив: 2006.12.10;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.049 c
