Архив форумов ЦИТФорума

[Zap]

Проблема вот. Создал я несколько объектов в runtime - режиме. Дал им имена - каждому свое, но всеже чем-то похожее на имя предыдущего (Val1, Val2, Val3 и т.д.). А объявлял я его так :
TCSpinEdit *Spin=new TCSpinEdit(this);
потом имя присвоил
Spin->Name="Val1";
Делал все это в цикле. Так вот как узнать имя компонента, который изменяют (событие OnChange)? Или может у кого-нибудь есть другие предложения? Помогите пожалуйста.

[Shuran]

Насколько я понимаю, в функцию OnChange поступает параметр TObject *Sender.

Вот его то и надо использовать:

TCSpinEdit *Spin=(TCSpinEdit *)Sender;

[Zap]

Спасибо, но вот этих Spin-ов много и каждому я присвоил собственное имя. Вот как это выглядит:

Spin->Name="Val1";

Вот как обратиться к этому Val1

[Shuran]

TCSpinEdit *Spin=(TCSpinEdit *)Sender;

где Spin - и есть тот твой Val1, или Val2 и т.д. Тебе не надо уже будет использовать Val1, если у тебя уже есть Spin (это будет одно и то же, только с разными именами).

Если тебе очень важно (ты будешь выполнять разные действия) так бери его имя:

switch(Spin->Name) {
case "Val1": break;
case "Val2": break;
case "Val3": break;
default: printf("Неизвестный SpinEdit"); break;
}

Что не понял, спрашивай.

[Shuran]

... исправлюсь. В конце писал бред (не понял почему).
Так вот.
У каждого объекта есть св-во Tag и если ты при создании объекты Val1 присвоишь Tag=1, Val2 - Tag=2 и т.д., то сейчас можешь проверять это свойство.