Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.10;
Скачать: CL | DM;

Вниз

Удаление   Найти похожие ветки 

 
DeoS   (2004-09-25 00:59) [0]

Так я создаю Image каждый раз при вызове этой функции
function jump1(): string;
var
   imgline: TImage;
begin
   imgline := Timage.Create(Form1);
   form1.image2.Picture.loadfromfile("line1.bmp");
   form1.image2.Top := form1.image2.top - 9;
   imgline.Parent := form1;
   imgline.Picture.LoadFromFile("color14.BMP");
   imgline.Top := form1.image2.Top + form1.image2.Height - 1;
   imgline.left := form1.image2.Left;
end;

А как удалить по нажатию кнопки все созданые Image?


 
GuAV ©   (2004-09-25 01:23) [1]


> А как удалить по нажатию кнопки все созданые Image?

Написать в обработчике нажатия кнопки код, который вызовет free для каждого Image.



Страницы: 1 вся ветка

Текущий архив: 2004.10.10;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.046 c
14-1095732732
Думкин
2004-09-21 06:12
2004.10.10
С днем рождения! 21 сентября


14-1095934931
Layner
2004-09-23 14:22
2004.10.10
OpenSourse


3-1094652066
Mefodiy
2004-09-08 18:01
2004.10.10
Ошибка "Invalid file name" при SQL запросе


4-1093831190
Registr
2004-08-30 05:59
2004.10.10
Получение каталога Windows в NT


14-1095459260
123
2004-09-18 02:14
2004.10.10
ЭВМ былых времен.