瀏覽代碼

Don't treat Ctrl+whatever+key as Ctrl+key. (Ctrl+Alt+M may be used for mu.)

git-svn-id: file:///var/svn/tigccpp/trunk/tigcc/ide@834 9552661e-59e3-4036-b4f2-dbe53926924f
kevinkofler 18 年之前
父節點
當前提交
3d49d5d468
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      CodeCompletion/CompletionForm.pas

+ 2 - 2
CodeCompletion/CompletionForm.pas

@@ -570,13 +570,13 @@ begin
 		end;
 		Key := NewKey;
 	end
-	else if (ssCtrl in Shift) and ((Key = VK_SPACE) or (Key = Ord('M'))) then
+	else if (Shift = [ssCtrl]) and ((Key = VK_SPACE) or (Key = Ord('M'))) then
 	begin
 		Key := 0;
 		StopKey := True;
 		ShowCompletion;
 	end
-	else if (ssCtrl in Shift) and (Key = Ord('J')) then
+	else if (Shift = [ssCtrl]) and (Key = Ord('J')) then
 	begin
 		Key := 0;
 		StopKey := True;