请教一个问题，在线等待！

想在dbgrideh中转换输入法。  
  在某列中打开中文输入法：      
  if   dbgrideh1.SelectedField.FieldNo=2   then  
      begin  
          dbgrideh1.Columns[1].ImeMode:=imOpen;  
          dbgrideh1.Columns[1].ImeName:='紫光拼音输入法';  
      end;  
  在第一次获得焦点时不能转换，需要第二次获得焦点（使用tab,enter键）  
   
  if   dbgrideh1.SelectedField.FieldNo=3   then  
      begin  
          dbgrideh1.Columns[1].ImeMode:=imclose;  
          dbgrideh1.Columns[1].ImeName:='';  
      end;  
  如果转换为中文输入法后就不会转换为英文了  
  这是为什么，怎么解决？ 问题点数：20、回复次数：4Top

1 楼saien（精益求精）回复于 2003-11-03 15:03:30 得分 5

//   切换到指定的输入法  
   
  function   SetActivateIme(sWanted:   string):   boolean;   far;  
  Top

2 楼ymzhou（痛苦的猪）回复于 2003-11-03 16:26:35 得分 0

好像不行吗。  
  哪位高手指点一下！！Top

3 楼zhoutian618（秦失其鹿，天下共逐，唯胜者得鹿而割之）回复于 2003-11-03 16:35:54 得分 15

if   dbgrideh1.SelectedField.FieldNo=3   then  
      begin  
          dbgrideh1.Columns[1].ImeMode:=imDontCare;  
          dbgrideh1.Columns[1].ImeName:='';  
      end;  
  Top

4 楼ymzhou（痛苦的猪）回复于 2003-11-03 16:43:50 得分 0

这样也不行的啊。Top

相关问题

• 输入法
• 转换
• dbgrideh
• imename
• imemode
• selectedfield
• fieldno
• columns
• then begin

• 帖主：ymzhou
• saien
• zhoutian618

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载