| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Удаление

Sele ©   (2006-08-05 18:51:00) 

Хай
Динамически создаю несколько Timage . Потом возникает желание их
удалить -) .
Собсно вопрос : как удалить все Timage на форме.

---

Anatoly Podgoretsky   (2006-08-06 14:56:00) [1]

GeLLeR ©   (06.08.06 00:23) [6]
Смеешься? А справку посмотреть?

---

Kolan   (2006-08-06 08:48:00) [2]

> image1.destroy ?

А если Image = nil ? Шо будет. Чправку гляньте.....

> While (something) do
>  anything
>

Whatever

---

GeLLeR   (2006-08-06 01:29:00) [3]

> {Do smth}

While (something) do
 anything

:-D

---

GeLLeR   (2006-08-06 00:23:00) [4]

image1.destroy ?

---

Loginov Dmitry   (2006-08-05 21:03:00) [5]

Если создаешь их так:
 TImage.Create(Self)

то удаляй их так:

 for I := 0 to Self.ComponentCount - 1 do
   if (Self.Components[I] is TImage) and
      (Self.Components[I].Name = '')
   then
     Self.Components[I].Free;

---

sele   (2006-08-05 18:55:00) [6]

Спасибо

---

Kolan   (2006-08-05 18:54:00) [7]

var
 Image: TImage;
begin
 Image := TImage.Create;
 try
   {Do smth}
 funally
    Image.Free;
 end;
end;

---

Sele   (2006-08-05 18:53:00) [8]

что Free

---

Anatoly Podgoretsky   (2006-08-05 18:52:00) [9]

Free

---

Наверх