Удаление

← →
Sele © (2006-08-05 18:51) [0]

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

← →
Anatoly Podgoretsky © (2006-08-05 18:52) [1]

Free

← →
Sele © (2006-08-05 18:53) [2]

что Free

← →
Kolan © (2006-08-05 18:54) [3]

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

← →
sele © (2006-08-05 18:55) [4]

Спасибо

← →
Loginov Dmitry © (2006-08-05 21:03) [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;

← →
GeLLeR © (2006-08-06 00:23) [6]

image1.destroy ?

> {Do smth}

While (something) do
anything

:-D

> image1.destroy ?

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

> While (something) do
> anything
>

Whatever

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