![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как удалить все компоненты сделанные в Run time
49 Cent © (2006-05-04 12:38:00)Суть в том, что делаю на базе timage клоны, которые затем передвигаю по экрану. Необходимо в результате нажатия на кнопку удалить все имеющиеся на форме timage, кроме image1, поскольку это основа для клонирования. Имена клонированным объектам программа не дает, поскольку такой необходимости не было. Как удалить все image кроме image1?
Заранее спасибо!
ЮЮ (2006-05-04 12:54:00) [21]Созданные объекты хранить в TObjectList.Create( true);
Затем достаточно Clear
Elen (2006-05-04 12:48:00) [22]Попробуй
for i:=0 to form1.controlcount-1 do begin
if (form1.controls[i] is Timage) then
if (Timage(form1.controls[i].name<>'Image1') then Удаляем обьект
end;