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

Вниз

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

 
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 вся ветка

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

Наверх





Память: 0.45 MB
Время: 0.043 c
6-1114460382
Erich
2005-04-26 00:19
2005.08.07
Аналог HyperTerminal


1-1121701815
Destroyer
2005-07-18 19:50
2005.08.07
Как удалить секцию в ini файле?


1-1121347729
Zak3D[@Tm]
2005-07-14 17:28
2005.08.07
Взаимосвязь модулей приложения.


3-1120208921
Kreyl
2005-07-01 13:08
2005.08.07
Чайницкий вопрос про добавление данных


1-1121453808
Destroyer
2005-07-15 22:56
2005.08.07
Помогите, плз, с динамическим созданием двумерного массива





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский