| 1560 |
|
|
| 1561 |
Application.UnhookMainWindow(Hook); |
Application.UnhookMainWindow(Hook); |
| 1562 |
//アプリケーション終了の前にダウンロードスレッドに正常終了を促す |
//アプリケーション終了の前にダウンロードスレッドに正常終了を促す |
| 1563 |
|
FControlThread.DownloadAbort; |
| 1564 |
FControlThread.Terminate; |
FControlThread.Terminate; |
| 1565 |
|
|
| 1566 |
//OnDestoryだと再起動をかけたときなどに保存されないのでOnCloseQueryで設定保存 |
//OnDestoryだと再起動をかけたときなどに保存されないのでOnCloseQueryで設定保存 |
| 1611 |
GikoSys.Setting.ResRange := FResRangeMenuSelect; |
GikoSys.Setting.ResRange := FResRangeMenuSelect; |
| 1612 |
except |
except |
| 1613 |
end; |
end; |
| 1614 |
|
//今のwinodwのスタイルでCoolBarの位置、ウィンドウの位置を保存 |
| 1615 |
//一時的に通常スタイルに戻してCoolBarの位置、ウィンドウの位置を保存 |
SaveCoolBarSettings; |
| 1616 |
//※注意:OnDestroy、OnCloseQueryで使うことしか考慮されていない |
GikoSys.Setting.WriteWindowSettingFile; |
| 1617 |
if WindowState <> wsNormal then begin |
// 名前とメールの保存なのでエディタが閉じた後ならいつでもいい |
| 1618 |
WindowState := wsNormal; |
GikoSys.Setting.WriteNameMailSettingFile; |
|
end; |
|
|
|
|
|
try |
|
|
SaveCoolBarSettings; |
|
|
except |
|
|
end; |
|
|
|
|
|
try |
|
|
GikoSys.Setting.WriteWindowSettingFile; |
|
|
GikoSys.Setting.WriteNameMailSettingFile; |
|
|
except |
|
|
end; |
|
| 1619 |
|
|
| 1620 |
//入力アシスト機構の設定の保存 |
//入力アシスト機構の設定の保存 |
| 1621 |
InputAssistDM.SaveToFile(GikoSys.GetInputAssistFileName); |
InputAssistDM.SaveToFile(GikoSys.GetInputAssistFileName); |
| 1648 |
RoundList.SaveRoundFile; |
RoundList.SaveRoundFile; |
| 1649 |
except |
except |
| 1650 |
end; |
end; |
| 1651 |
|
|
| 1652 |
|
// タスクトレイのアイコン削除 |
| 1653 |
|
if (FIconData.uID <> 0) then begin |
| 1654 |
|
Shell_NotifyIcon(NIM_DELETE, @FIconData); |
| 1655 |
|
end; |
| 1656 |
|
|
| 1657 |
end; |
end; |
| 1658 |
|
|
| 1659 |
procedure TGikoForm.FormDestroy(Sender: TObject); |
procedure TGikoForm.FormDestroy(Sender: TObject); |
| 1661 |
i : Integer; |
i : Integer; |
| 1662 |
tmpBool : Boolean; |
tmpBool : Boolean; |
| 1663 |
begin |
begin |
| 1664 |
// タスクトレイのアイコン削除 |
//一時的に通常スタイルに戻してCoolBarの位置、ウィンドウの位置を保存 |
| 1665 |
if (FIconData.uID <> 0) then begin |
//※注意:OnDestroyで使うことしか考慮されていない |
| 1666 |
Shell_NotifyIcon(NIM_DELETE, @FIconData); |
// 他でやると再描画が発生する |
| 1667 |
|
if WindowState <> wsNormal then begin |
| 1668 |
|
WindowState := wsNormal; |
| 1669 |
|
try |
| 1670 |
|
SaveCoolBarSettings; |
| 1671 |
|
GikoSys.Setting.WriteWindowSettingFile; |
| 1672 |
|
except |
| 1673 |
|
end; |
| 1674 |
end; |
end; |
| 1675 |
|
|
| 1676 |
// マウスジェスチャー開放 |
// マウスジェスチャー開放 |
| 1755 |
|
|
| 1756 |
try |
try |
| 1757 |
try |
try |
| 1758 |
FControlThread.DownloadAbort; |
//FControlThread.DownloadAbort; |
| 1759 |
FControlThread.Terminate; |
FControlThread.Terminate; |
| 1760 |
FControlThread.WaitFor; |
FControlThread.WaitFor; |
| 1761 |
except |
except |