如何維持目前的輸入法?? |
|
答題得分者是：skurama
|
|
ivankuo
中階會員   發表：132 回覆：272 積分：95 註冊：2002-11-21 發送簡訊給我 |
|
|
skurama
中階會員 發表：88 回覆：127 積分：73 註冊：2002-07-22 發送簡訊給我 |
比較簡單的方法是改元件imename屬性，
設為大易的話，
以後只要focuse到該元件，
就會是大易輸入法!! 如果是多使用者，可以做個ini檔存放該使用者用的輸入法
在用跑迴圈的方式，在formcreate時，把所有元件的imename設為大易 var
i : integer;
begin
for i := 0 to self.componentcount - 1 do
begin
if (self.components[i] is TEdit) then
(self.components[i] as TEdit).ImeName := '中文 (繁體) - 大易';
end; end; 這樣可以讓只要是TEdit元件在Form被建立時，
設定Imename都是大易輸入法。
可以再改改讓所有有ImeName的元件都被設定為大易輸入法! 不知道是不是你要的功能，
參考參考~ ----------------
昂首千丘遠，
嘯傲風間，
堪尋敵手共論劍，
高處不甚寒!
---------------- 發表人 - skurama 於 2003/12/25 11:29:27
------
---------------- 初出芧房程設師， 左鍵右鼠寫程式， 日扣夜寫眼框溼， 望能早成系分師。 ---------------- |
|
ivankuo
中階會員 發表：132 回覆：272 積分：95 註冊：2002-11-21 發送簡訊給我 |
發表時間：2003-12-25 11:04:45
IP:61.221.xxx.xxx 未訂閱
系統時間：2024-04-20 15:50:31
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |