Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как динамически в RadioGroup создать Items? [D7, XP]

Lebedev © (2007-10-18 07:28:00)
Здравствуйте.
Я создаю динамически объект Radio Group
nrg:=TRadioGroup.Create(Panel1); nrg.top:=8; nrg.left:=8; nrg.Name:='RadioGroup'; nrg.Width:=697; nrg.Height:=105; nrg.caption:='Caption'; //здесь хочу создать пункты выбора nrg.Parent:=Panel1;

Он создаётся конечно. Но я не могу понять, как динамически создать пункты выбора, то есть Items.
Подскажите пожалуйста.

Reindeer Moss Eater (2007-10-20 12:20:00) [1]
Items.Clear;

Lebedev (2007-10-20 11:59:00) [2]
Подскажите пожалуйста, а как удалять Items динамически в RadioGroup?

Lebedev (2007-10-18 13:39:00) [3]
Да, слово "ячейка" была. ))) Что это означает?

ASoft (2007-10-18 13:35:00) [4]

> Lebedev (18.10.07 12:12) [5]

первая буква в надписи, случайно не "я" была?:-)

Lebedev (2007-10-18 12:12:00) [5]
Ужас! Глюк исчез, когда я, в надписи, поставил впереди пробел!!! Это же кошмар!

Lebedev (2007-10-18 10:58:00) [6]
Спасибо большое, работает. Но это не помогло исправить глюк, который был до этого. :-(

Я пишу код:
nrg.Parent:=Panel1; nrg.Items.Add('Надпись нормально оображается'); nrg.Items.Add('Надпись нормально оображается'); nrg.Items.Add('Надпись нормально оображается'); nrg.Items.Add('Надпись оображается толькона английском языке');

Появляется четыре пункта выбора. НО надписи есть только у первых трёх из четырёх, если надписи на русском. Если же в последней сделать латиницу, то всё хорошо отображается. Но дело в том, что мне надо, чтобы было на русском.
Я совершенно не могу понять природу этого глюка. Та же проблемы была и в случае нединамического создания, то есть в конструкторе.

Как быть? Подскажите! Я замучился уже.

Ega23 (2007-10-18 09:10:00) [7]
nrg:=TRadioGroup.Create(Panel1); nrg.top:=8; nrg.left:=8; nrg.Name:='RadioGroup'; nrg.Width:=697; nrg.Height:=105; nrg.caption:='Caption'; //здесь хочу создать пункты выбора nrg.Parent:=Panel1; // пункты выбора надо создавать здесь

Lebedev (2007-10-18 09:07:00) [8]
Не получается. Если ввожу nrg.Items.Add('string');
То выводится ошибка “Project Project1.exe raised exception class EInvalidOperation with message ‘Control ‘RadioGroup’ has no parent window’ Process stopped”

MBo (2007-10-18 07:56:00) [9]
nrg.Items.Add

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »