Fehler wenn exe größer ist als 1mb

[marius0702]

Delphi-Quellcode:

unit Unit1;

//...

var
  Form1: TForm1;

//...
uses Unit2, unit3, Unit4, unit5, Unit6, Unit7, Unit9;

//...
procedure TForm1.Button98Click(Sender: TObject);
begin
with TForm2.Create(self) do
begin
  try
    showmodal;
  finally
    free;
  end;
end;
end;
//...

Delphi-Quellcode:

unit Unit2;

//...

var
Form2: TForm2;

implementation

uses Unit1;

//...

procedure TForm2.FormShow(Sender: TObject);

begin
edit1.Text:=form1.edit12.Text;
//das geht nicht
end;