program susceptibility; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Interfaces, // this includes the LCL widgetset Forms, tachartlazaruspkg, mainunit, connect, connect { you can add units after this }; {$R *.res} begin RequireDerivedFormResource:=True; Application.Scaled:=True; Application.Initialize; Application.CreateForm(Tmain, main); Application.CreateForm(TConnecting, Connecting); Application.CreateForm(TConnectform, Connectform); Application.Run; end.