О загрузке runtime package

[Stilet]

закрыть и освободить все экземпляры класса формы,

Обычно хватает просто освобождения самой формы, а она уже должна сама освободить контроллы, которые к ней прикреплены либо методом InsertControl либо предположим если прикрепленный контрол наследник от TComponent, то в конструкторе контрола указывается self или та самая форма. таким образом он к ней прикрепляется. И при освобождении формы освобождается с ней.

[GunSmoker]

Проще создать фиктивный компонент и задать его владельцем (Owner) всех форм и компонент от DLL. Удаляете этот компонент - удаляются все формы.

[Greek9000]

К сожалению, последние три совета (№39, №40 и №41) - это не совсем то, что требуется и вот почему:
1. что бы в секции finalization разместить очистку списка созданных экземпляров мне нужно указатели на эти экземпляры как-то там разместить. А страница создаётся таким образом: MyClass := GetClass("ClassName"); Page := MyClass.Create;
То есть, здесь я использую возможность не передавать в пакет какие-либо данные, что в свою очередь позволяет мне размещать в виде страниц любые формы унаследованные от TForm. Даже не надо писать на OnClose Action := caFree; Это очень удобно и от этого не хочется отказываться.

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

3. Да, конечно. Форма при закрытии сама освобождает все свои контролы, отцепляется от БД, высвобождает занятые ею ресурсы, но представьте, что у Вас (ну или у меня) загружены 2 страницы - 1-ая от класса TfrmMyPageOne, а вторая - от класса TfrmMyPageTwo, и при этом загружены пакеты MaPackSome и MyPackStuff. И тут возникает необходимость обновить пакет MyPackStuff. Вопрос: как узнать какую страницу надо закрыть, что бы нужный мне пакет выгрузился? А выгрузить его надо, т.к. надо обновить его файл.

Кстати, есть ещё один вариант - выгрузить вообще все формы, обновить пакет и загрузить формы обратно. Но согласитесь, что выгрузка только нужных форм выглядит куда красивее!

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

Проще создать фиктивный компонент и задать его владельцем (Owner) всех форм и компонент от DLL. Удаляете этот компонент - удаляются все формы.

Тоже очень хороший вариант. Он был в моём списке первым. Пока я не сообразил, что для того, что бы он сработал при создании формы надо знать в каком модуле (читай: пакете) она объявлена.

Ведь загрузка пакетов происходит при запуске программы, а страницы из форм создаются в течение работы произвольно.

Только что встретил на одном форуме похожую проблему.
Цитата оттуда: "По классу формы элементарно определить имя модуля". Это как раз то, что нужно. Но описание методы там нет.
Вот что по этому поводу говорит Гугл Как?

[Ins]

Ни разу не проблема. Усовершенствуй свою фабрику форм, реализуй в пакетах что-то вроде такого:

function FormFactory(ClassName: string): TFormClass;
begin
  // Где SomeOwner - компонент пакета, который уничтожается в finalization
  Result := GetClass(ClassName).Create(SomeOwner);
end;

[evg_m]

как узнать какую страницу надо закрыть, что бы нужный мне пакет выгрузился?

почему бы не
1. попросить нужный пакет самому закрыть свои страницы(формы)
procedure CloseMyForms; exports; (screen.forms[j]=<mtclass>)
можно даже будет проверить удалось ли все сделать
function CloseMyForms; boolean;
2. спросить у пакета какая страница его

[Greek9000]

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

почему бы не
1. попросить нужный пакет самому закрыть свои страницы(формы)
procedure CloseMyForms; exports; (screen.forms[j]=<mtclass>)
можно даже будет проверить удалось ли все сделать
function CloseMyForms; boolean;
2. спросить у пакета какая страница его

См. пост №43, часть 1. Потому что это повлечёт за собой потерю удобства разработки. Зачем дописывать в каждый новый пакет доп. код, если существует способ (я в это верю ) спросить у класса формы, в каком юните он объявлен.

[GunSmoker]

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

если существует способ (я в это верю ) спросить у класса формы, в каком юните он объявлен.

Наверное, вы говорите про FindClassHInstance?

[Ins]

если существует способ (я в это верю ) спросить у класса формы, в каком юните он объявлен.

Существует Только тебе наверное не юнит нужен, а HModule пакета:
function FindHInstance(Address: Pointer): LongWord;
function FindClassHInstance(ClassType: TClass): LongWord;

GunSmoker опередил