Цитата:
|
Сообщение от Viajero
Ну если одна и та же кнопка то появлятся то исчезает, то я бы, использовал бы свойство visible и не мучил бы диспетчер памяти
|
ну если автор именно так хочет, то надо поправить кое-что. Раз кнопки будут добавляться последовательно, то видимо и убивать надо с последней и по одной за каждый вызов, тогда немножко по другому:
Код:
For Form1.ControlCount-1 downto 0 do
if Form1.Controls[i].ClassType = TSoundButton then
begin
ListBox1.Items.Add( SButton2.caption);
TSoundButton(Form1.Controls[i]).Free;
Break;
end;