Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Giko.pas

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

revision 1.459 by genyakun, Tue Oct 12 01:44:10 2004 UTC revision 1.460 by yoffy, Wed Oct 13 23:53:22 2004 UTC
# Line 1936  var Line 1936  var
1936  begin  begin
1937  //      Application.OnDeactivate := nil;  //      Application.OnDeactivate := nil;
1938  //      Self.OnDeactivate := nil;  //      Self.OnDeactivate := nil;
1939          // マウスジェスチャー保存          // マウスジェスチャー開放
1940          try          try
1941                  MouseGesture.UnHook;                  MouseGesture.UnHook;
                 GikoSys.Setting.Gestures.SaveGesture( GikoSys.Setting.GetGestureFileName );  
1942          except          except
1943          end;          end;
1944          try          try
# Line 6967  var Line 6966  var
6966  begin  begin
6967          Dlg := TKeySettingForm.Create(Self);          Dlg := TKeySettingForm.Create(Self);
6968          try          try
6969                  if Dlg.ShowModal = mrOk then                  if Dlg.ShowModal = mrOk then begin
6970                          GikoSys.SaveKeySetting(ActionList);                          GikoSys.SaveKeySetting(ActionList);
6971              GikoSys.SaveEditorKeySetting(Dlg.EditorForm.ActionList);                          GikoSys.Setting.Gestures.SaveGesture( GikoSys.Setting.GetGestureFileName );
6972                    end;
6973                    GikoSys.SaveEditorKeySetting(Dlg.EditorForm.ActionList);
6974          finally          finally
6975                  Dlg.Release;                  Dlg.Release;
6976                  MouseGesture.UnHook;                  MouseGesture.UnHook;

Legend:
Removed from v.1.459  
changed lines
  Added in v.1.460

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