Обращение к динамически созданным компонентам.

[Lime]

Я так понимаю тут не предусматривается удаление самих обьектов.
Удалить ведь не проблема , проблема в том , что обьект с таким именем уже остаётся , но принадлежит он другому элементу Tabs[] ...
А создаю я их какраз с константным именем и переменной кол-ва самих элементов.

ns.Name := 'tabsheet'+ inttostr(TabsCount);
syn.Name := 'syn'+ inttostr(TabsCount);

Как я уже сказал , выход вижу один , ввести ещё переменную которая предотвратит создание обьектов с таким же именем.

к тому-же события

syn.OnChange := CustomSynChange;

Происходят в других компонентах. Тоесть сдвиг.

[Dj_smart]

А перед удалением записи объекты уничтожаешь?

Хм, я предложил ТС сделать это самому, можно было и догадатся, ведь не только этими двумя компонентами взможно ограничится запись.

А создаю я их какраз с константным именем и переменной кол-ва самих элементов.

Странно, но имя можно и не задавать - ведь обращаться можно через запись зная id и т.д.
Кстати насчет эвентов, создайте компоненту, потом эвент и удалите компоненту а эвент останется. Ничего опасного нет, в качестве эвента подойдет любая процедура с описанием Sender:TObject;

[Lime]

Сообщение от Dj_smart

Хм, я предложил ТС сделать это самому, можно было и догадатся, ведь не только этими двумя компонентами взможно ограничится запись.

Странно, но имя можно и не задавать - ведь обращаться можно через запись зная id и т.д.
Кстати насчет эвентов, создайте компоненту, потом эвент и удалите компоненту а эвент останется. Ничего опасного нет, в качестве эвента подойдет любая процедура с описанием Sender:TObject;

По примеру я понял что компоненты не уничтожаются а данные сдвигаются на 1 в перёд начиная с "удаляемой" ячейки.
Я так полагаю при создании компонента он должен иметь имя. , никогда не пробовал создать компонент без имени.. да обращяюсь к нему через массив , НО всёже.
На счёт "эвентов" я так и сделал. Но при некоторых обстоятельствах события одних компонентов действуют на другие ... ( эту проблему вроде уже решил.)
Вот немного наваял ...
Проблема с сохранением .. иногда закрывается то , что не должно закрываття ..( вкладки )
В атаче ехе.

[Dj_smart]

Я так полагаю при создании компонента он должен иметь имя. , никогда не пробовал создать компонент без имени.. да обращяюсь к нему через массив , НО всёже.

Имхо нет смысла, т.к. ты даже небудеш к небу обращатся по имени ища компонент...

На счёт "эвентов" я так и сделал. Но при некоторых обстоятельствах события одних компонентов действуют на другие ... ( эту проблему вроде уже решил.)

например
(Sender as TSynEdit).Tag чтоб узнать id эдита и дельше манипулировать с ним...

[Lime]

syn.OnChange := CustomSynChange;

procedure TForm1.CustomSynChange(Sender: TObject);
begin
TabChange;
end;

Procedure TabChange;
begin
tabs[ActivetabNum].Compiled := false;
tabs[ActivetabNum].Tab.ImageIndex := 1;
end;

Сейчас работает нормально.
При уничтожении обьектов влияет на то что нужно.

//ns.Name := 'tabsheet'+ inttostr(TabCrNum);

Как ни странно работает (имхо не должно)

[Neeter]

Как ни странно работает (имхо не должно)

Чего тут странного?
Свойство name совсем не readonly. И вроде имеет простой тип string.
Я полностью согласен с Dj_smart, надо в свойство Tag записывать индекс в массиве и все. А заморачиваться с именами совсем не надо.

[Lime]

Сообщение от Neeter

Чего тут странного?
Свойство name совсем не readonly. И вроде имеет простой тип string.
Я полностью согласен с Dj_smart, надо в свойство Tag записывать индекс в массиве и все. А заморачиваться с именами совсем не надо.

Приведу простой пример из жизни , как бы Вам жилось не имея имени? А лиш своё место в "калонии" под каким-то номером ?
//Всеголиш пример "здравого" смысла.
Так вот и я думаю что компоненту нужно имя. иначе как ( по другому) к нему обращатся ...

[Dj_smart]

Так вот и я думаю что компоненту нужно имя. иначе как ( по другому) к нему обращатся ...

Очень просто - лиш зная id, т.к. компонент в пределах записи может иметь лиш одно имя (физическое, не свойство name а то что описано в var).
Куча примеров

Tabs[id].Edit.блаблабла:=1;
if Tebs[(sender as TSynEdit].Tag].Edit.Text='' then exit;

и тд..

[Neeter]

Приведу простой пример из жизни , как бы Вам жилось не имея имени? А лиш своё место в "калонии" под каким-то номером ?
//Всеголиш пример "здравого" смысла.
Так вот и я думаю что компоненту нужно имя. иначе как ( по другому) к нему обращатся ...

Ох, посмеялся )

А как вы будете обращаться по имени, если все компоненты находятся в массиве? там нужен id, index или как хотите так и называйте.

[Lime]

Я и обращаюсь к компонентам по номеру в массиве .
Я ведь написал (по другому) - тобиш другой вариант кроме как из массива.
Мне в данном примере другово варианта не нужно , но опять-же как я уже писал , он по здравому смыслу должен быть.
По крайней мере создавая 2 компонента с одинаковым именем получаем ошибку , значит имя всёже имеет значение.

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

Покачто проблема почти не качается работы с обращением к динамически созданным компонентом. Всё делается через массив и id . тоесть номером. А на счёт имени - это другое дело.