1.52.1.658

[gikonavigoeson/gikonavi.git] / gikoNavi.dpr

diff --git a/gikoNavi.dpr b/gikoNavi.dpr
index 63dab7e..1eba8b8 100644 (file)
--- a/gikoNavi.dpr
+++ b/gikoNavi.dpr
@@ -44,7 +44,36 @@ uses
   ToolBarSetting in 'ToolBarSetting.pas' {ToolBarSettingDialog},
   ToolBarUtil in 'ToolBarUtil.pas',
   YofUtils in 'YofUtils.pas',
-  AbonUnit in 'AbonUnit.pas';
+  AbonUnit in 'AbonUnit.pas',
+  IndividualAbon in 'IndividualAbon.pas' {IndividualAbonForm},
+  Trip in 'Trip.pas',
+  GikoXMLDoc in 'GikoXMLDoc.pas',
+  ExternalBoardManager in 'ExternalBoardManager.pas',
+  ExternalThreadItem in 'ExternalThreadItem.pas',
+  ExternalBoardItem in 'ExternalBoardItem.pas',
+  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',
+  GikoCoolBar in 'Component\GikoCoolBar.pas',
+  GikoListView in 'Component\GikoListView.pas',
+  GikoPanel in 'Component\GikoPanel.pas',
+  KuroutSetting in 'KuroutSetting.pas' {KuroutOption},
+  GikoDB in 'GikoDB.pas',
+  GestureModel in 'GestureModel.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};
 
 {$R *.RES}
 {$R gikoResource.res}
@@ -63,7 +92,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);
@@ -83,6 +116,7 @@ begin
                                end;
                        end;
                end;
+
                CloseHandle(hMutex);
        end else begin
                //\83~\83\85\81[\83e\83b\83N\83X\82ª\91¶\8dÝ\82µ\82È\82¢\8fê\8d\87\82Í\83A\83v\83\8a\83P\81[\83V\83\87\83\93\8bN\93®\91±\8ds
@@ -93,6 +127,8 @@ begin
                Application.CreateForm(TMainWindow, MainWindow);
   Application.CreateForm(TFavoriteDM, FavoriteDM);
   Application.CreateForm(TAddressHistoryDM, AddressHistoryDM);
+  Application.CreateForm(TGikoDM, GikoDM);
+  Application.CreateForm(TInputAssistDM, InputAssistDM);
   Application.CreateForm(TGikoForm, GikoForm);
   Application.Run;
                ReleaseMutex(hMutex);