ComboBox与输入法之间的问题！

Question

事情是这样的，我在ComboBox控件里面加入了一些中文的items，ComboBox的属性设置：AutoComplete:=true; AutoDropDown:=true;问题是，当我在它上面打开输入法输入中文的时候下拉框挡住了输入法的选字窗口非常不方便，请问各位高手这个问题如何解决？

Answer 1

将combobox1.imeName:=''就可以了。

Answer 2

将combobox1.imeName:=''就可以了。

Answer 3

难道真的没办法???我用DevExpress Quantum Grid 带的cxComboBox控件做的话
在下拉框出现的情况下先关闭输入法,再打开输入法
这样输入法的窗口就可以在下拉列表上面了,大家可以试试.在程序中能实现这个步骤吗?Quantum Grid控件在http://www.delphibox.com 有的下载,挺好用的哦 ^_^

Answer 4

wilowind(无风雪亦飘):光标跟 随去掉了也是不行的，我也试过的

Answer 5

下拉的时候imemode:=imDisable之后恢复

Answer 6

不用combobox,做一个listbox,autodropdown可以在combobox的OnEnter和OnExit里控制的。这样就不会挡住了。

Answer 7

to libra01(PASS&WORLD): 具体怎么搞??

Answer 8

将combobox1.imeName:=''就可以了。

Answer 9

在onEnter事件里面加入combobox1.imeName:=''还是不行啊,输入法有关闭啊~~~!!!

Answer 10

combobox.imeMode:=imclose;
combobox.imename:='';

Answer 11

最后还是用了libra01(PASS&WORLD)的方法,用ListBox代替了combobox自己的下拉框好像还可以充撑一下场面,呵呵,大家不妨试试有没有问题,欢迎大家继续讨论,看看有没有更好的方法,我10月份再结贴 ^_^unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Edit1: TEdit;
    ComboBox1: TComboBox;
    ListBox1: TListBox;
    procedure ComboBox1Enter(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure ComboBox1Exit(Sender: TObject);
    procedure ListBox1Click(Sender: TObject);
    procedure ComboBox1Change(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
listbox1.Items:=combobox1.Items;
end;procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
if listbox1.Visible=false then
  begin
    listbox1.Visible:=true;
  end
else
  begin
    listbox1.Visible:=false;
  end;
end;procedure TForm1.ComboBox1Exit(Sender: TObject);
begin
if listbox1.Focused then
  begin
    listbox1.Visible:=true;
    combobox1.DroppedDown:=false;
  end
else
  begin
    listbox1.Visible:=false;
    combobox1.DroppedDown:=false;
  end;
end;procedure TForm1.ListBox1Click(Sender: TObject);
begin
combobox1.Text:=listbox1.Items[listbox1.ItemIndex];
end;procedure TForm1.ComboBox1Change(Sender: TObject);
begin
listbox1.ItemIndex:=combobox1.ItemIndex;
end;end.