remodelingブランチから、最新版をマージ

[gikonavigoeson/gikonavi.git] / KeySetting.pas

diff --git a/KeySetting.pas b/KeySetting.pas
index b924c4d..80acc37 100644 (file)
--- a/KeySetting.pas
+++ b/KeySetting.pas
@@ -314,7 +314,7 @@ begin
                Item := ActiveListView.Items[i];
                if TObject(Item.Data) is TKeySettingItem then begin
                        KeyItem := TKeySettingItem(Item.Data);
-                       if (GestureEdit.Text <> '')
+                       if (GestureEdit.Text <> GUESTURE_NOTHING)
                        and (KeyItem.Gesture = GestureEdit.Text) then begin
                                MsgBox(Handle, ERR_MSG, ERR_TITLE, MB_OK or MB_ICONSTOP);
                                HotKey.SetFocus;