Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Вниз

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

 
ЁПРСТ   (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.


 
Mim1 ©   (2004-05-04 16:03) [5]

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

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


 
Anatoly Podgoretsky ©   (2004-05-04 16:24) [6]

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



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

Форум: "Основная";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.037 c
3-1082465871
stud
2004-04-20 16:57
2004.05.16
использование параметра для LIKE


14-1082825195
PaRL
2004-04-24 20:46
2004.05.16
Образование


14-1082786750
Mr.Credo
2004-04-24 10:05
2004.05.16
Shareware


6-1080208521
Valentin
2004-03-25 12:55
2004.05.16
нужен модуль


3-1082535717
Марат
2004-04-21 12:21
2004.05.16
Разбивка текста





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский