Форум: "Основная";
Текущий архив: 2002.11.14;
Скачать: [xml.tar.bz2];
Внизкак удалить компонент? Найти похожие ветки
← →
Novichek (2002-11-04 05:18) [0]дело такое: создал программно кнопку BitBtn, а как ее теперь програмно уничтожить?
← →
PKT (2002-11-04 05:27) [1]Если Вы ее создавали как
BitBtn1 := TBitBtn.Create(Form1)
то при уничтожении формы уничтожится и кнопка.
Если нужно уничтожить ри работе формы,
BitBtn1.Free
← →
Novichek (2002-11-04 07:01) [2]я ее создал так: tbitbtn.Create(self)
и не ее одну а много, а теперь немогу их все удалить...
помогите плиз.
← →
MBo (2002-11-04 07:10) [3]Поподробнее - как создавал.
Есть подозрение, что ссылки утеряны.
Тогда поможет проход по Components[i]
← →
Novichek (2002-11-04 07:16) [4]
for q:=1 to 5 do
begin
with tbitbtn.Create(self)do
begin
parent:=panel1;
width:=panel1.Height;
height:=panel1.Height;
left:=panel1.Height*(q+1)-panel1.Height;
top:=0;
end;
end;
panel1 - это такая длинная узкая полоска.
← →
PKT (2002-11-04 07:20) [5]
var
Buttons: array[1..5] of TBitBtn;
for q:=1 to 5 do
begin
Buttons[I] := tbitbtn.Create(self);
with Buttons[I] do begin
parent:=panel1;
width:=panel1.Height;
height:=panel1.Height;
left:=panel1.Height*(q+1)-panel1.Height;
top:=0;
end;
end;
Теперь можете уничтожать
Buttons[1].Free;
Buttons[4].Free;
Как Вам захочется
← →
Novichek (2002-11-04 07:34) [6]а как потом обратно создать? у меня ошибка выскакивает при повторном создании
← →
Novichek (2002-11-04 07:50) [7]все разобрался. спасибо
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.14;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.011 c