Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.05.18;
Скачать: CL | DM;

Вниз

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

 
kuzulis ©   (2008-04-23 10:22) [0]

Доброго времени суток!!!

Мне нужно как то перед динамическим созданием кнопки узнать.. существует ли она до этого..
т.е у меня в цикле проверяется некое условие.. и если оно труе - то создается кнопка...  И поэтому нада проверить - была ли она уже создана на предыдущем шаге..

Подскажите как это сделать??


 
ANB   (2008-04-23 10:27) [1]

Самый тупой способ - завести переменную и при создании кнопки изменять ее значение. Потом его проверять.


 
Anatoly Podgoretsky ©   (2008-04-23 10:29) [2]

> ANB  (23.04.2008 10:27:01)  [1]

Зачем, кнопка сама в состоянии себя идентифицировать, просто множество вариантов.


 
Ega23 ©   (2008-04-23 10:32) [3]

1. Изначально - объявить как nil.
2. Потом проверять, равно nil или нет. Если равно - не создана. Если не равно - создана.
3. Не забыть после "убийства" приравнять к nil.


 
Рамиль ©   (2008-04-23 10:34) [4]

var
 Button: TButton

if not Assigned(Button) then
begin
 Button := TButton.Create(Self);
 ...
end

Только при уничтожении присваивай Button = nil и для проверки пользуйся этой и только этой переменной.


 
Ega23 ©   (2008-04-23 10:37) [5]


> Рамиль ©   (23.04.08 10:34) [4]


var
Button: TButton;
begin
 Button := nil;  // !!!!!!

 .....
end;


 
Рамиль ©   (2008-04-23 10:39) [6]


> Ega23 ©   (23.04.08 10:37) [5]

Это смотря где var стоит :-)


 
Рамиль ©   (2008-04-23 10:40) [7]

Не, ну должен же автор знать, где надо инициализировать переменные, а где можно и так.


 
Anatoly Podgoretsky ©   (2008-04-23 11:21) [8]

> Рамиль  (23.04.2008 10:34:04)  [4]

Замучается ошибки отлаживать, что угодно, но только не переменную.


 
Leonid Troyanovsky ©   (2008-04-23 12:44) [9]


> kuzulis ©   (23.04.08 10:22)  

> Мне нужно как то перед динамическим созданием кнопки узнать.
> . существует ли она до этого..

Перебираем ее Parent.Controls.

--
Regards, LVT.



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

Текущий архив: 2008.05.18;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.043 c
15-1207249464
ZeroDivide
2008-04-03 23:04
2008.05.18
Купил коммуникатор. Поздравьте!


2-1208322639
Sw
2008-04-16 09:10
2008.05.18
SQL запрос


2-1208335003
Andy BitOff (PPC)
2008-04-16 12:36
2008.05.18
Быстрое определение валидности Excel евского файла


2-1208842288
Динис_ИС
2008-04-22 09:31
2008.05.18
Многострочный Label


2-1208420154
Igor M.
2008-04-17 12:15
2008.05.18
Gif Animation





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