熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> Delphi編程 >> 正文

獲取年齡與根據用戶輸入需求自動調整輸入法[2]

2013-11-23 17:38:06  來源: Delphi編程 
    ——此文章摘自《Delphi開發經驗技巧寶典》定價 特價 購買>>http://tracklinktechcn/?m_id=dangdang&a_id=A&l=&l_type= width= height= border= nosave>

    通過activatekeyboardlayout方法切換到指定的輸入法主要代碼如下
    procedure TFormInput(InputName: string);
    var
      I: Integer;
      myhkl: hkl;
    begin
      ImeName := InputName;
      if Length(ImeName) <> then
       begin
         if ScreenImesCount <> then
          begin
            I := screenImesindexof(imename);
            if I >= then
             myhkl := hkl(screenImesobjects[i])
            else
             begin
               ShowMessage(此輸入法沒有啟用);
             end;
            activatekeyboardlayout(myhklKLF_ACTIVATE); //設置相應的輸入法
          end;
       end;
    end;

right>[http://developcsaicn/delphi/htm>]  []  


From:http://tw.wingwit.com/Article/program/Delphi/201311/24806.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.