program Converspolygone; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Interfaces, // this includes the LCL widgetset Forms, MainFrm, UnitPolygoneSHP, MyTypes, GPFunctions, CadreDessin2D, OSMUtilities, VertexUnit, KMLStructure, rxnew, OSMUtilitiesWays, frmOSMWaysUtils, frmJournal, frmTraitementDonnees6Min { you can add units after this }; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.CreateForm(TdlgTraitementDonnees6Min, dlgTraitementDonnees6Min); //Application.CreateForm(TdlgOSMWaysUtils, dlgOSMWaysUtils); //Application.CreateForm(TdlgJournal, dlgJournal); Application.Run; end.