请教要使stringgrid中的某几列用五笔输入法,另几列用拼音输入法,如何实现?

解决方案 »

  1.   

    procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
      ARow: Integer; var CanSelect: Boolean);
    begin
      Caption:=inttostr(arow);
      if ARow mod 2 =0 then
      tedit(StringGrid1).ImeName:='中文 (简体) - 智能 ABC'//偶数列
      else
      tedit(StringGrid1).ImeName:='';//奇数列
    end;
      

  2.   

    cbIME:TComboBoxcbIME.Items.CommaText:=Screen.Imes.CommaText;这样可以取得当前系统安装的输入法。其实可以写一个窗体让用户选择自己喜欢的输入法。
    这样一劳永逸啊。不过要麻烦用户自己先设置一下。
      

  3.   

    我也想过用楼上的方法,但只是现在用户要我快点改好,所以我就先应急按简单的改了。
    cll007的方法就是有时不灵。大家有没有更好的啊!
      

  4.   

    bt的需求,呵呵。  
    hehe