Я думаю, что ты нам бессовестно лжёшь Если выполняется строка dm := TDmEditObjects.Create(self) (то есть на неё можно поставить брейкпоинт, и выполнение на неё придёт), то новый модуль данных таки создаётся. Это можно проконтролировать в отладчике, засунув в watch выражение pointer(dm). Чтобы добиться такого поведения, как ты говоришь, нужно перекрывать метод NewInstance, чего в твоём модуле данных, я уверен, никто не делал.

Есть другой эффект, который, скорее всего, и происходит. У модуля данных есть свойство Name. Когда создаётся первый модуль данных, оно получает значение "dmEditObjects". Когда создаётся второй модуль данных, в Self уже есть компонент с именем dmEditObjects - поэтому свойство Name нового модуля устанавливается в dmEditObjects_1. Когда создаётся третий - в dmEditObjects_2 итп. А вот теперь надо понять, как работает сериализация. В твоём фрейме используются компоненты из модуля данных. В dfm это записано примерно так: Datasource = dmEditObjects.Query123. Когда фрейм создаётся, парсер читает dfm, доходит до этой ссылки, ищет компонент с именем "dmEditObjects", находит, ищет в нём компонент с именем "Query123", снова находит - и в результате все фреймы, сколько бы их ни было, оказываются завязаны на первый из созданных модулей данных. Как следствие, они показывают одно и то же и ты интерпретируешь это как "создаётся только один модуль".

Последний вопрос - как избавиться от этой проблемы и сделать всё как надо. Тут есть варианты. Самые тупые разработчики откажутся от использования модулей данных и будут создавать все запросы кодом в ран-тайме либо побросают их на фрейм. Чуть более адекватные - создадут модуль данных, после чего руками привяжут все ссылки на него, примерно так:




Ну а правильный метод очевиден, если прочитать предыдущий рассказ: нужно создать модуль данных, дать фрейму инициализироваться (прочитать и проинтерпретировать dfm) и после этого убрать у модуля свойство Name:




Тогда следующий созданный модуль данных снова получит имя DmEditObjects, фрейм правильно привяжется и всё будет в порядке.

Для того, чтобы сбрасывать это свойство, удобнее всего доопределить у фрейма метод Loaded и делать там это присваивание после inherited.

Экземпляр живёт в оперативной памяти, по какому-то адресу. Указатель на экземпляр живёт в секции private. Другой указатель на экземпляр живёт в списке Self.Components (где Self - тот компонент, который передаётся как Owner в модуль данных). Вся сериализация идёт через второй указатель. Первый можно вообще грохнуть, и это ни на что не повлияет (ну, точнее, повлияет только на те строки программного кода, которые к нему прямо обращаются. если их нет, то программа отлично будет компилироваться и работать и без него).


Конечно.

Ровно тем же, чем отделить Class1 от Class2, а Unit1 от Unit2 лучше, чем держать их вместе. Если ты не сторонник подхода "всегда делать любое приложение в одном файле", то, наверное, сам ощущаешь, когда лучше разделить.

Это ответ на тот вопрос, который ты задал.


Не знаю. Ты это придумал - ты и скажи, откуда она.


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