![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() ![]() |
![]() |
Scorp_Freeman |
![]()
Сообщение
#1
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 68 Пол: Мужской Реальное имя: Сергей Репутация: ![]() ![]() ![]() |
Я програмно создал форму след. образом:
Цитата 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; Этот код я поместил в обычную кнопку. Вопрос таков: Как сделать так чтобы эта созданная форма удалялась при ее закрытии ??? объявил я ее как глобальную Цитата Form1: TForm1; frmView:TForm; Сообщение отредактировано: Scorp_Freeman - 27.04.2007 15:55 |
klem4 |
![]()
Сообщение
#2
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
frmView.Free -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Scorp_Freeman |
![]()
Сообщение
#3
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 68 Пол: Мужской Реальное имя: Сергей Репутация: ![]() ![]() ![]() |
|
klem4 |
![]()
Сообщение
#4
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
frm := Tfrm.Create(Application); -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Scorp_Freeman |
![]()
Сообщение
#5
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 68 Пол: Мужской Реальное имя: Сергей Репутация: ![]() ![]() ![]() |
спасибо,подходит )
|
![]() ![]() |
![]() |
Текстовая версия | 13.07.2025 12:28 |