[Message Prev][Message Next][Thread Prev][Thread Next][Message Index][Thread Index]

[MD:691] Re: [MD:682]about IMM API



NIIBE Yutaka <gniibe@xxxxxxxxx> writes:

> 大場さん writes:
>  > 過去の himi さんの mail と doc-string をまとめてみましたので、取り合え
>  > ず添付します。
> 
> とても, ありがたい。大変ありがとうございます。

ついでに、わたしのサンプルプログラムを添付しましょう。
変換するためのプログラムです。

## 変換している例文はこの際気にしないように。^^ 

from himi
(setq foo1 (w32-ime-create-conversion-agent))

(let (result candidate)
  (w32-ime-set-composition-string 
   foo1
   '(("あなたの" . target-converted)
     ("ことを" . converted)
     ("あいして" . converted)
     ("います" . converted))
   'string
   t)
  (w32-ime-deal-with-context foo1 'convert)
  (setq result (w32-ime-get-composition-string foo1 'comp))
  (condition-case nil
      (w32-ime-open-candidate foo1 0)
      (error))
  (condition-case nil
      (w32-ime-open-candidate foo1 1)
      (error))
  (setq candidate (w32-ime-get-candidate-list foo1 0))
  (list result candidate))