DLL med Form

du starter med at lave en tom dll (du ved file->new->dll) og tilpasser den så den ser således ud :

library Project1;

uses
  SysUtils,
  Classes;

{$R *.RES}

begin
end.


Så tilføjer du en form til din Dll : (File->new->form)

så retter du din Dll kode til således den ser således ud :

library Project1;

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

{$R *.RES}

function CreateForm : pointer;
begin
  Application.CreateForm(TForm1, Form1);
  result := Form1;
end;

exports
  CreateForm index 0 name \'CreateForm\';

begin
end.

Du kan eventuelt gøre \"noget\" ved din form.

Gem og kompiler.

Så mangler du blot en exe fil der kan kalde den :

Du laver din en nyt projekt.

lige under hvor der står var From1:TForm1 skriver du :

function CreateForm : pointer; External \'Project1.dll\';

Så mangler du blot at kalde det hele. Lad os fx sætte koden på en knap :

procedure TForm1.Button1Click(Sender: TObject);
var
  DllForm : TForm;
begin
  DllForm := Tform(CreateForm);
  DllForm.ShowModal;
end;


Jens B

Jeg går ud fra, at vi snakker om C-Builder, når du siger form. Du starter med at lave en form ganske som du plejer, hvorefter du laver en DLL-fil, som benytter den unit hvor formen ligger i. Du kan så bare lave en instans af formen, og vise den som normalt... Det er der ingen ben i. Du skal bare være opmærksom på, at der kan være problemer med at udveksle data mellem \"hovedprogrammet\" og dll\'en :)

/Wisen

Steffe >
Jeg bruger C++ Builder 5. Men jeg har prøvet et Eksemple, som man finder i hjælpen filen, men det kan jeg ikke få til at virke.

Prøv evt. at poste noget kode her...

Steffe >
Jeg prøvede i et par timer og fik det til at virke, men jeg ved ikke hvordan man laver en DLL med en form...