Хранение формы в dll

[pain_maker]

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

Может кто занимался таким вопросом?

вот код программы:

program Programm;

uses
  Forms,
  Windows;\\\\\

{$R *.res}

procedure CreateMainForm(AppHandle: THandle); stdcall; external 'MainForm.dll';
//procedure DestroyMainForm; stdcall; external 'MainForm.dll';

begin
//Application.Initialize;
CreateMainForm(Application.Handle);
//Application.ShowMainForm:=true;
//Application.Run;

end.

Код DLL:

library MainForm;

uses
  SysUtils,
  Classes,
  MainFormUnit in 'MainFormUnit.pas' {MyMainForm};

{$R *.res}

exports

CreateMainForm;
//DestroyMainForm;

begin
end.

Код 'MainFormUnit.pas':

unit MainFormUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TMyMainForm = class(TForm)
    Memo1: TMemo;
    Button1: TButton;
    Button2: TButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

procedure CreateMainForm(AppHandle: THandle); stdcall;
//procedure DestroyMainForm; stdcall;

var
  MyMainForm: TMyMainForm;

implementation

{$R *.dfm}

procedure CreateMainForm(AppHandle: THandle);
begin
  Application.Handle := AppHandle;
  MyMainForm := TMyMainForm.Create(Application);
  MyMainForm.Show
end;

{procedure DestroyMainForm;
begin
  MyMainForm.Free;
end;}

end.

Еще в тему вопрос: какая зависимость у LoadLibrary?

[JTG]

MyMainForm.ShowModal;

Кроме того, у DLL и EXE будут свои экземпляры "стандартных" объектов, поэтому при подключении библиотеки нужно передавать не AppHandle, а весь Application, Screen, Clipboard и т.п.

А вообще для таких целей используют Other -> ActiveX -> Active Form, так безопаснее.

[Человек_Борща]

код корректно оформи..

[pain_maker]

JTG
Модальная форма - не вариант.
Active Form - не пользовал, но посмотрю, Спасибо!

Человек_Борща
А что не так в оформлении??

нашел: loadlibrary зависит от Windows.

По основному вопросу кто-нибудь подскажет?

Еще, как вариант, хранить фрейм в DLL, который растянуть на всю форму. Как его тогда подгрузить на форму??

[DimOn4Ik]

а можно в DLLхранить вкладку PageControl ?

[pain_maker]

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

а можно в DLLхранить вкладку PageControl ?

можно. Можно хранить любой объект. Вопрос как его подгрузить на форму..
___________________________________ _________________________
Окей. Разобрался, для тех кому интересно выкладываю:
Код программы:

program StoreFormInDLL;

uses
  Windows; {для пользования фунции LoadLibrary}

{$R *.res}

begin
  LoadLibrary('FormInDLL.dll')
end.

Код DLL:

library FormInDLL;

uses
  Forms,
  SysUtils,
  Classes,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Собственно вот) В Unit1'е храним форму. Теперь можно дорабатывать форму как нам угодно и заменять dll в папке с программой.