delphi 改变输入法位置

var
  cf: TCompositionForm;
begin
  cf.ptCurrentPos := Point(500, 10);
  ImmSetCompositionWindow(ImmGetContext(Handle), @cf);
end;
其他输入法测试是可以的，QQ五笔不可以。
原因是因为QQ五笔输入法——高级设置里设置了光标跟随。其他输入法也有的话，也是一样会没有效果的。被输入法自己处理了