{%ToDo 'gikoNavi.todo'}
uses
- //Memcheck in 'Memcheck.pas',
Windows,
SysUtils,
Forms,
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',
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},
ExternalBoardItem in 'ExternalBoardItem.pas',
ExternalBoardPlugInMain in 'ExternalBoardPlugInMain.pas',
ExternalFilePath in 'ExternalFilePath.pas',
- MojuUtils in 'MojuUtils.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},
+ 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};
{$R *.RES}
{$R gikoResource.res}
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);
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;