・板一覧更新の処理メッセージを追加

[gikonavigoeson/gikonavi.git] / gikoNavi.dpr

diff --git a/gikoNavi.dpr b/gikoNavi.dpr
index c300b67..d706a36 100644 (file)
--- a/gikoNavi.dpr
+++ b/gikoNavi.dpr
@@ -19,7 +19,6 @@ uses
   GikoSystem in 'GikoSystem.pas',
   Setting in 'Setting.pas',
   BoardGroup in 'BoardGroup.pas',
-  SaveFile in 'SaveFile.pas',
   Sort in 'Sort.pas',
   ThreadControl in 'ThreadControl.pas',
   ItemDownload in 'ItemDownload.pas',
@@ -38,7 +37,6 @@ uses
   Preview in 'Preview.pas',
   HTMLDocumentEvent in 'HTMLDocumentEvent.pas',
   Kotehan in 'Kotehan.pas' {KotehanDialog},
-  MonaUtils in 'MonaUtils.pas',
   HintWindow in 'HintWindow.pas',
   GikoUtil in 'GikoUtil.pas',
   ToolBarSetting in 'ToolBarSetting.pas' {ToolBarSettingDialog},
@@ -54,7 +52,6 @@ uses
   ExternalBoardPlugInMain in 'ExternalBoardPlugInMain.pas',
   ExternalFilePath in 'ExternalFilePath.pas',
   MojuUtils in 'MojuUtils.pas',
-  crc in 'gzip_delphi2\crc.pas',
   gzip in 'gzip_delphi2\gzip.pas',
   zlib in 'gzip_delphi2\zlib.pas',
   bmRegExp in 'bmRegExp\bmregexp.pas',
@@ -64,7 +61,39 @@ uses
   KuroutSetting in 'KuroutSetting.pas' {KuroutOption},
   GikoDB in 'GikoDB.pas',
   GestureModel in 'GestureModel.pas',
-  Gesture in 'Gesture.pas';
+  Gesture in 'Gesture.pas',
+  GikoBayesian in 'GikoBayesian.pas',
+  Y_TextConverter in 'res\ExternalBoardPlugIn\Y_TextConverter.pas',
+  HTMLCreate in 'HTMLCreate.pas',
+  ListViewUtils in 'ListViewUtils.pas',
+  GikoDataModule in 'GikoDataModule.pas' {GikoDM: TDataModule},
+  BrowserRecord in 'BrowserRecord.pas',
+  GikoMessage in 'GikoMessage.pas',
+  InputAssist in 'InputAssist.pas' {InputAssistForm},
+  InputAssistDataModule in 'InputAssistDataModule.pas' {InputAssistDM: TDataModule},
+  DefaultFileManager in 'DefaultFileManager.pas',
+  MoveHistoryItem in 'MoveHistoryItem.pas',
+  SambaTimer in 'SambaTimer.pas',
+  HistoryList in 'HistoryList.pas',
+  ReplaceDataModule in 'ReplaceDataModule.pas' {ReplaceDM: TDataModule},
+  ResPopupBrowser in 'ResPopupBrowser.pas',
+  SkinFiles in 'SkinFiles.pas',
+  NewBoardURL in 'NewBoardURL.pas' {NewBoardURLForm},
+  ExtPreviewDatamodule in 'ExtPreviewDatamodule.pas' {ExtPreviewDM: TDataModule},
+  UpdateCheck in 'UpdateCheck.pas' {UpdateCheckForm},
+  SHA1Unit in 'SHA1Unit.pas',
+  PopupMenuUtil in 'PopupMenuUtil.pas',
+  PopupMenuSetting in 'PopupMenuSetting.pas' {PopupMenuSettingDialog},
+  Belib in 'Belib.pas',
+  WideMemo in 'WideMemo.pas',
+  ThreadSearch in 'ThreadSearch.pas' {ThreadSrch},
+  uLkJSON in 'lkJSON\uLkJSON.pas',
+  ThreadNGEdt in 'ThreadNGEdt.pas' {ThreadNGEdit},
+  AbonInfo in 'AbonInfo.pas',
+  AbonInfoSet in 'AbonInfoSet.pas' {AbonInfoEdit},
+  NgEditor in 'NgEditor.pas' {NgEdit},
+  RegExpTester in 'RegExpTester.pas' {RegExpTest},
+  BbsThrSel in 'BbsThrSel.pas' {BbsThreadSel};
 
 {$R *.RES}
 {$R gikoResource.res}
@@ -83,7 +112,11 @@ begin
                Wnd := FindWindow('TGikoForm', nil);
                if Wnd <> 0 then begin
                        //\8aù\82É\8bN\93®\8dÏ\82Ý\83M\83R\83i\83r\82Ì\83A\83N\83e\83B\83u\89»\81\95\83A\83C\83R\83\93\89»\82³\82ê\82Ä\82½\82ç\95\9c\8c³
-                       SetForegroundWindow(Wnd);
+                       try
+                               SetForegroundWindow(Wnd);
+                       except
+               //\8f\89\8aú\89»\82ª\8fI\82í\82Á\82Ä\82¢\82È\82¢\82Æ\83t\83H\83A\83O\83\89\83E\83\93\83h\82É\88Ú\82¹\82¸\82É\97á\8aO\94­\90¶
+                       end;
                        if IsIconic(Wnd) then
                                SendMessage(Wnd, WM_SYSCOMMAND, SC_RESTORE, -1);
 //                     AppWnd := GetWindowLong(Wnd, GWL_HWNDPARENT);
@@ -114,7 +147,12 @@ begin
                Application.CreateForm(TMainWindow, MainWindow);
   Application.CreateForm(TFavoriteDM, FavoriteDM);
   Application.CreateForm(TAddressHistoryDM, AddressHistoryDM);
+  Application.CreateForm(TGikoDM, GikoDM);
+  Application.CreateForm(TInputAssistDM, InputAssistDM);
+  Application.CreateForm(TReplaceDM, ReplaceDM);
+  Application.CreateForm(TExtPreviewDM, ExtPreviewDM);
   Application.CreateForm(TGikoForm, GikoForm);
+  Application.CreateForm(TUpdateCheckForm, UpdateCheckForm);
   Application.Run;
                ReleaseMutex(hMutex);
        end;