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

Вниз

Проблема с GroupBox.Children   Найти похожие ветки 

 
vampir_infernal   (2006-12-17 20:36) [0]

Здравствуйте, уважаемые.
Матчасть: D2005, KOL 2.48, WinXP SP2.
Проблема: в приложении необходимо часто создавать и уничтожать контролы на гроупбоксе. Все контролы, которые нужно уничтожать, создаются с AParent = Groupbox, где GroupBox - контрол, созданный с помощью NewGroupBox от формы, и их свойству Tag присваюваются значения от 1 до 9 (пока что только 9 контролов). Для особождения всех контролов независимо от их количества, думал использовать такой код:
for i:=0 to GroupBox.ChildCount do
  GroupBox.Children[i].Free;

но такой код ведет себя по крайней мере странно: метод Free вызывается только для контролов с нечетным Tag, то есть 1,3,5,7,9, и далее происходит ошибка. Если же вместо Free написать Visible := false;, то все контролы скрываются как и положено
Вопрос: как же все таки уничтожить все контролы на групбоксе?
P.S. Есди кто знает другой способ динамически уничтожать и создавать контролы на форме\групбоксе в рантайм, то я внимательно выслушаю его(ее) вариант.
Спасибо.


 
Vladimir Kladov   (2006-12-17 20:38) [1]

for i := GroupBox.ChildCount-1 downto 0 do

Это же классика...


 
vampir_infernal   (2006-12-17 20:46) [2]

понял свой косяк. действительно, глупейший вопрос. Спасибо за помощь.



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

Форум: "KOL";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.04 c
2-1183302519
Qzzma
2007-07-01 19:08
2007.07.29
Как узнать путь запущенного приложения?


2-1183377068
Regdown
2007-07-02 15:51
2007.07.29
Ряд вопросов


15-1183225038
@!!ex
2007-06-30 21:37
2007.07.29
Можно ли вернуть РАБОЧУЮЮ, но не совместимой с железом видюху?


15-1182910386
Slider007
2007-06-27 06:13
2007.07.29
С днем рождения ! 27 июня 2007 среда


1-1179846066
nickmas
2007-05-22 19:01
2007.07.29
MDI-окна





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