Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/gikoNavi.dpr

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.6.2.2 by yoffy, Thu Sep 9 16:20:34 2004 UTC revision 1.52 by h677, Tue Feb 22 13:37:51 2011 UTC
# Line 19  uses Line 19  uses
19    GikoSystem in 'GikoSystem.pas',    GikoSystem in 'GikoSystem.pas',
20    Setting in 'Setting.pas',    Setting in 'Setting.pas',
21    BoardGroup in 'BoardGroup.pas',    BoardGroup in 'BoardGroup.pas',
   SaveFile in 'SaveFile.pas',  
22    Sort in 'Sort.pas',    Sort in 'Sort.pas',
23    ThreadControl in 'ThreadControl.pas',    ThreadControl in 'ThreadControl.pas',
24    ItemDownload in 'ItemDownload.pas',    ItemDownload in 'ItemDownload.pas',
# Line 38  uses Line 37  uses
37    Preview in 'Preview.pas',    Preview in 'Preview.pas',
38    HTMLDocumentEvent in 'HTMLDocumentEvent.pas',    HTMLDocumentEvent in 'HTMLDocumentEvent.pas',
39    Kotehan in 'Kotehan.pas' {KotehanDialog},    Kotehan in 'Kotehan.pas' {KotehanDialog},
   MonaUtils in 'MonaUtils.pas',  
40    HintWindow in 'HintWindow.pas',    HintWindow in 'HintWindow.pas',
41    GikoUtil in 'GikoUtil.pas',    GikoUtil in 'GikoUtil.pas',
42    ToolBarSetting in 'ToolBarSetting.pas' {ToolBarSettingDialog},    ToolBarSetting in 'ToolBarSetting.pas' {ToolBarSettingDialog},
# Line 54  uses Line 52  uses
52    ExternalBoardPlugInMain in 'ExternalBoardPlugInMain.pas',    ExternalBoardPlugInMain in 'ExternalBoardPlugInMain.pas',
53    ExternalFilePath in 'ExternalFilePath.pas',    ExternalFilePath in 'ExternalFilePath.pas',
54    MojuUtils in 'MojuUtils.pas',    MojuUtils in 'MojuUtils.pas',
   crc in 'gzip_delphi2\crc.pas',  
55    gzip in 'gzip_delphi2\gzip.pas',    gzip in 'gzip_delphi2\gzip.pas',
56    zlib in 'gzip_delphi2\zlib.pas',    zlib in 'gzip_delphi2\zlib.pas',
57    bmRegExp in 'bmRegExp\bmregexp.pas',    bmRegExp in 'bmRegExp\bmregexp.pas',
58    GikoCoolBar in 'Component\GikoCoolBar.pas',    GikoCoolBar in 'Component\GikoCoolBar.pas',
59    GikoListView in 'Component\GikoListView.pas',    GikoListView in 'Component\GikoListView.pas',
60    GikoPanel in 'Component\GikoPanel.pas',    GikoPanel in 'Component\GikoPanel.pas',
61    KuroutSetting in 'KuroutSetting.pas' {KuroutOption};    KuroutSetting in 'KuroutSetting.pas' {KuroutOption},
62      GikoDB in 'GikoDB.pas',
63      GestureModel in 'GestureModel.pas',
64      Gesture in 'Gesture.pas',
65      GikoBayesian in 'GikoBayesian.pas',
66      Y_TextConverter in 'res\ExternalBoardPlugIn\Y_TextConverter.pas',
67      HTMLCreate in 'HTMLCreate.pas',
68      ListViewUtils in 'ListViewUtils.pas',
69      GikoDataModule in 'GikoDataModule.pas' {GikoDM: TDataModule},
70      BrowserRecord in 'BrowserRecord.pas',
71      GikoMessage in 'GikoMessage.pas',
72      InputAssist in 'InputAssist.pas' {InputAssistForm},
73      InputAssistDataModule in 'InputAssistDataModule.pas' {InputAssistDM: TDataModule},
74      DefaultFileManager in 'DefaultFileManager.pas',
75      MoveHistoryItem in 'MoveHistoryItem.pas',
76      SambaTimer in 'SambaTimer.pas',
77      HistoryList in 'HistoryList.pas',
78      ReplaceDataModule in 'ReplaceDataModule.pas' {ReplaceDM: TDataModule},
79      ResPopupBrowser in 'ResPopupBrowser.pas',
80      SkinFiles in 'SkinFiles.pas',
81      NewBoardURL in 'NewBoardURL.pas' {NewBoardURLForm},
82      ExtPreviewDatamodule in 'ExtPreviewDatamodule.pas' {ExtPreviewDM: TDataModule},
83      UpdateCheck in 'UpdateCheck.pas' {UpdateCheckForm},
84      SHA1Unit in 'SHA1Unit.pas',
85      PopupMenuUtil in 'PopupMenuUtil.pas',
86      PopupMenuSetting in 'PopupMenuSetting.pas' {PopupMenuSettingDialog},
87      Belib in 'Belib.pas';
88    
89  {$R *.RES}  {$R *.RES}
90  {$R gikoResource.res}  {$R gikoResource.res}
# Line 80  begin Line 103  begin
103                  Wnd := FindWindow('TGikoForm', nil);                  Wnd := FindWindow('TGikoForm', nil);
104                  if Wnd <> 0 then begin                  if Wnd <> 0 then begin
105                          //既に起動済みギコナビのアクティブ化&アイコン化されてたら復元                          //既に起動済みギコナビのアクティブ化&アイコン化されてたら復元
106                          SetForegroundWindow(Wnd);                          try
107                                    SetForegroundWindow(Wnd);
108                            except
109                    //初期化が終わっていないとフォアグラウンドに移せずに例外発生
110                            end;
111                          if IsIconic(Wnd) then                          if IsIconic(Wnd) then
112                                  SendMessage(Wnd, WM_SYSCOMMAND, SC_RESTORE, -1);                                  SendMessage(Wnd, WM_SYSCOMMAND, SC_RESTORE, -1);
113  //                      AppWnd := GetWindowLong(Wnd, GWL_HWNDPARENT);  //                      AppWnd := GetWindowLong(Wnd, GWL_HWNDPARENT);
# Line 111  begin Line 138  begin
138                  Application.CreateForm(TMainWindow, MainWindow);                  Application.CreateForm(TMainWindow, MainWindow);
139    Application.CreateForm(TFavoriteDM, FavoriteDM);    Application.CreateForm(TFavoriteDM, FavoriteDM);
140    Application.CreateForm(TAddressHistoryDM, AddressHistoryDM);    Application.CreateForm(TAddressHistoryDM, AddressHistoryDM);
141      Application.CreateForm(TGikoDM, GikoDM);
142      Application.CreateForm(TInputAssistDM, InputAssistDM);
143      Application.CreateForm(TReplaceDM, ReplaceDM);
144      Application.CreateForm(TExtPreviewDM, ExtPreviewDM);
145    Application.CreateForm(TGikoForm, GikoForm);    Application.CreateForm(TGikoForm, GikoForm);
146      Application.CreateForm(TUpdateCheckForm, UpdateCheckForm);
147    Application.Run;    Application.Run;
148                  ReleaseMutex(hMutex);                  ReleaseMutex(hMutex);
149          end;          end;

Legend:
Removed from v.1.6.2.2  
changed lines
  Added in v.1.52

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26