program FileToss; uses Vcl.Forms, DFileTossMain in 'DFileTossMain.pas' {DlgFileTossMain}, DSetting in 'DSetting.pas' {DlgSetting}; {$R *.res} begin ReportMemoryLeaksOnShutdown := DebugHook <> 0; Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TDlgFileTossMain, DlgFileTossMain); Application.Run; end.