Как убить компонент при выходе из него

← →
ЁПРСТ (2004-05-04 15:44) [0]

Дело в том, что, если делать Destroy на OnExit, само собой, ругается. А как сделать чтобы не ругался? Может как-то можно определить, что компонент теряет фокус? Заранее спасибо.

← →
Плохиш (2004-05-04 15:48) [1]

Может достаточно Visible:=false для вашей задачи?

← →
Mim1 © (2004-05-04 15:50) [2]

у меня не ругается, а как ругается у вас?

procedure TForm1.Button1Exit(Sender: TObject); begin Button1.Free; end;

← →
Yanis © (2004-05-04 15:53) [3]

>Может как-то можно определить, что компонент теряет фокус?

WM_KILLFOCUS

← →
ЁПРСТ (2004-05-04 16:00) [4]

Да нет, спасибо - уже сделал. В другом месте глючило. А может на такой вопрос ответите: как определить, что компонент уже Destroy`нут? Пробовал сверять CB=nil - не реагирует, потому что CB - нифига не nil.

ЁПРСТ (04.05.04 16:00) [4]

Вчера был разговор на эту тему, поищи соответствующую ветку.

Не надо ничего проверять на nil, опасно, если ты удалил компонент из формы, то он исчезнет и из components

Как убить компонент при выходе из него Найти похожие ветки