OSDN Git Service

入力アシストがCtrl + キーだったのを Ctrl + Spcに限定
authorh677 <h677>
Mon, 16 Jan 2006 15:12:13 +0000 (15:12 +0000)
committerh677 <h677>
Mon, 16 Jan 2006 15:12:13 +0000 (15:12 +0000)
Editor.pas

index e0f2731..08d6017 100644 (file)
@@ -2352,7 +2352,7 @@ begin
                                        wmMsg.Msg := Msg.message;
                                        wmMsg.CharCode := Word(Msg.wParam);
                                        wmMsg.KeyData := Msg.lParam;
-                                       if (wmMsg.CharCode = 229) then begin
+                                       if (wmMsg.CharCode = 229) and (wmMsg.KeyData = 3735553) then begin
                                                IMC := ImmGetContext(BodyEdit.Handle); //\83R\83\93\83e\83L\83X\83g\8eæ\93¾
                                                Len := ImmGetCompositionString(IMC, GCS_COMPSTR, nil, 0); //\82Ü\82¸\92·\82³\82ð\8eæ\93¾
                                                if (Len > 0) then begin