Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 1538 |
if (SearchDialog <> nil) then begin |
if (SearchDialog <> nil) then begin |
| 1539 |
if (SearchDialog.Visible) then begin |
if (SearchDialog.Visible) then begin |
| 1540 |
SearchDialog.Close; |
SearchDialog.Close; |
|
try |
|
|
SearchDialog.Release; |
|
|
except |
|
|
end; |
|
|
SearchDialog := nil; |
|
| 1541 |
end; |
end; |
| 1542 |
|
try |
| 1543 |
|
SearchDialog.Release; |
| 1544 |
|
except |
| 1545 |
|
end; |
| 1546 |
|
SearchDialog := nil; |
| 1547 |
end; |
end; |
| 1548 |
|
|
| 1549 |
//スクリーン上の全てのフォームから、EditorFormを閉じる |
//スクリーン上の全てのフォームから、EditorFormを閉じる |
| 1561 |
begin |
begin |
| 1562 |
// マウスジェスチャー開放 |
// マウスジェスチャー開放 |
| 1563 |
try |
try |
| 1564 |
|
if GikoSys.Setting.GestureEnabled then begin |
| 1565 |
|
MouseGesture.OnGestureStart := nil; |
| 1566 |
|
MouseGesture.OnGestureMove := nil; |
| 1567 |
|
MouseGesture.OnGestureEnd := nil; |
| 1568 |
|
end; |
| 1569 |
MouseGesture.Clear; |
MouseGesture.Clear; |
| 1570 |
MouseGesture.UnHook; |
MouseGesture.UnHook; |
| 1571 |
// MouseGesture.Free; // Free するといけない? |
// MouseGesture.Free; // Free するといけない? |
|
|
Legend:
| Removed from v.1.655 |
|
| changed lines |
| |
Added in v.1.656 |
|
|
|