program TestCallingForms_pj;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms,
TestCallingForms_Main, testcallingforms_01 , testcallingforms_02
{ you can add units after this };
{$R *.res}
begin
RequireDerivedFormResource:=True;
Application.Scaled:=True;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
//Application.CreateForm(TForm2, Form2);
//Application.CreateForm(TForm3, Form3); //<- if this is uncommented, the Sigsev doesnt occur
Application.Run;
end.