Цитата
frmView:=TForm.Create(Application);
with frmView do
begin
frmView.Caption:='Просмотр';
Width:=700;
Height:=500;
ImgView:=TImage.Create(frmView);
with ImgView do
begin
ImgView.Parent:=frmView;
ImgView.Top:=10;
ImgView.Left:=10;
ImgView.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
frmView.Show;
end;
with frmView do
begin
frmView.Caption:='Просмотр';
Width:=700;
Height:=500;
ImgView:=TImage.Create(frmView);
with ImgView do
begin
ImgView.Parent:=frmView;
ImgView.Top:=10;
ImgView.Left:=10;
ImgView.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
frmView.Show;
end;
Этот код я поместил в обычную кнопку.
Вопрос таков:
Как сделать так чтобы эта созданная форма удалялась при ее закрытии ???
объявил я ее как глобальную
Цитата
Form1: TForm1;
frmView:TForm;
frmView:TForm;