自動で半角カナ入力となるTextBox

TextBoxにフォーカスがあたった場合に
自動で、半角カナになるTextBoxを作成したいのですが
そのような事はできるのでしょうか？

No.3 ベストアンサー 回答者： castoff 回答日時： 2007/04/18 12:56

追記

http://hpcgi1.nifty.com/MADIA/DelphiBBS/wwwlng.c …
は参考になりますでしょうか。

この回答へのお礼

ありがとうございました。

お礼日時：2007/06/09 09:27

No.2 回答者： castoff 回答日時： 2007/04/18 12:49

Delphiは使用したことがないのですが

下記のソースは参考になりますか？

uses Imm;

procedure TForm1.Edit1Enter(Sender: TObject);
var
Imc: HIMC;
Conversion, Sentence: DWORD;
begin
Imc := ImmGetContext(Handle);
ImmGetConversionStatus(Imc, Conversion, Sentence);
ImmSetConversionStatus(Imc, Conversion, IME_SMODE_NONE);
ImmReleaseContext(Handle, Imc);
end;

No.1 回答者： castoff 回答日時： 2007/04/16 13:28

言語が何かわかりませんが、

IMEは設定できないのですか？

この回答への補足

言語はDelphiです。
IMEで設定できるのでしょうか？

補足日時：2007/04/17 08:53