Form zu einer "Gruppe" zuweisen?

[VT-DA]

Hi,

hmm. Irgendwie klappt alles nicht.
Ich hab jetzt mal nen Beispiel gemacht.
Vllt bringt das ja was?

Delphi-Quellcode:

library Gruppe;

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

var Form1, Form2: TForm;

{$R *.res}

procedure CreateDllForm; stdcall;
begin
  Form1 := TForm.Create(Application);
  Application.Handle := Form1;
  Form2 := TForm.Create(Application);
end;

procedure CreateForm; stdcall;
begin
  Form1 := TForm.Create(Application);
  Form2 := TForm.Create(Application);
  SetWindowLong(Form1, GWL_HWNDPARENT, Application.Form2);
  Form1.Show;
  Form2.Show;
end;

exports
  CreateForm, CreateDLLForm;

begin
end.

Mfg