| 6934 |
try |
try |
| 6935 |
if Dlg.ShowModal = mrOk then begin |
if Dlg.ShowModal = mrOk then begin |
| 6936 |
GikoSys.SaveKeySetting(ActionList); |
GikoSys.SaveKeySetting(ActionList); |
| 6937 |
|
GikoSys.SaveEditorKeySetting(Dlg.EditorForm.ActionList); |
| 6938 |
GikoSys.Setting.Gestures.SaveGesture( GikoSys.Setting.GetGestureFileName ); |
GikoSys.Setting.Gestures.SaveGesture( GikoSys.Setting.GetGestureFileName ); |
| 6939 |
end; |
end; |
| 6940 |
GikoSys.SaveEditorKeySetting(Dlg.EditorForm.ActionList); |
|
| 6941 |
finally |
finally |
| 6942 |
Dlg.Release; |
Dlg.Release; |
| 6943 |
MouseGesture.UnHook; |
MouseGesture.UnHook; |
| 6944 |
MouseGesture.OnGestureStart := OnGestureStart; |
MouseGesture.OnGestureStart := OnGestureStart; |
| 6945 |
MouseGesture.OnGestureMove := OnGestureMove; |
MouseGesture.OnGestureMove := OnGestureMove; |
| 6946 |
MouseGesture.OnGestureEnd := OnGestureEnd; |
MouseGesture.OnGestureEnd := OnGestureEnd; |
| 6947 |
if GikoSys.Setting.GestureEnabled then |
if GikoSys.Setting.GestureEnabled then begin |
| 6948 |
|
GikoSys.Setting.Gestures.ClearGesture; |
| 6949 |
|
GikoSys.Setting.Gestures.LoadGesture( |
| 6950 |
|
GikoSys.Setting.GetGestureFileName, ActionList ); |
| 6951 |
MouseGesture.SetHook( Handle ); |
MouseGesture.SetHook( Handle ); |
| 6952 |
|
end; |
| 6953 |
end; |
end; |
| 6954 |
end; |
end; |
| 6955 |
|
|
| 11578 |
procedure TGikoForm.FormActivate(Sender: TObject); |
procedure TGikoForm.FormActivate(Sender: TObject); |
| 11579 |
begin |
begin |
| 11580 |
if GikoSys.Setting.GestureEnabled then begin |
if GikoSys.Setting.GestureEnabled then begin |
| 11581 |
|
GikoSys.Setting.Gestures.ClearGesture; |
| 11582 |
|
GikoSys.Setting.Gestures.LoadGesture( |
| 11583 |
|
GikoSys.Setting.GetGestureFileName, ActionList ); |
| 11584 |
MouseGesture.UnHook; |
MouseGesture.UnHook; |
| 11585 |
MouseGesture.OnGestureStart := OnGestureStart; |
MouseGesture.OnGestureStart := OnGestureStart; |
| 11586 |
MouseGesture.OnGestureMove := OnGestureMove; |
MouseGesture.OnGestureMove := OnGestureMove; |