Главная страница
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.025 c
8-1090167181
Wistful
2004-07-18 20:13
2004.10.10
WaveOutWrite???


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


14-1095739399
R.O.O.T
2004-09-21 08:03
2004.10.10
Бесконечное сжатие


3-1094751452
radiant09
2004-09-09 21:37
2004.10.10
перетаскивание записей в dbgrid e


4-1094820071
pavel_guzhanov
2004-09-10 16:41
2004.10.10
Раскладка клавиатуры