Скачать: CL | DM;

Как правильно удалить кнопку из её обработчика?   Найти похожие ветки 

← →
Destroyer ©   (2005-07-18 15:18) [0]

Надо удалить кнопку из её же обработчика. Т.е. нажимаем на неё и она удаляется. Но эта кнопка была создана динамически и после её удаления надо изменить длину массива в котором она находится.

RecButOnPan=record
But:array of TSpeedButton;
end;

var
ButOnPan   : array of RecButOnPan;
openedpan  : integer;
nbOnPan    : integer;
begin
...
ButOnPan[openedpan].But[nbOnPan].Destroy;
setlength(ButOnPan[openedpan].But,nbOnPan);
...
end;
Проблема в том, что, по моему, после Destroy уже ничего выполнять в обработчике этой кнопки нельзя. Как правильно удалить эту кнопку?

---

← →
jack128 ©   (2005-07-18 15:28) [1]

http://delphimaster.net/view/1-1121085218/

---

← →
granni ©   (2005-07-18 15:29) [2]

Когда у меня была такая проблема, я просто в обработчике события устанавливал некоторый флаг, который проверял уже после работы обработчика

---

← →
Destroyer ©   (2005-07-18 16:11) [3]

Спасибо.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c