在VFP5.0中完成中英文自動切換
發(fā)表時(shí)間:2024-05-14 來源:明輝站整理相關(guān)軟件相關(guān)文章人氣:
[摘要]在用VFP5.0開發(fā)應(yīng)用系統(tǒng)時(shí),結(jié)合數(shù)據(jù)進(jìn)行處理,應(yīng)用最多的是文本框?qū)ο,特別是進(jìn)行中英文的輸入時(shí),來回切換非常繁瑣,所以我們可以借助自定義子類,來實(shí)現(xiàn)中英文輸入的自動切換。其步驟如下: 通過系統(tǒng)菜單欄“文件/新建/類…”啟動“新類”對話框,填入類名:gsTextBox,并設(shè)置父類為:T...
在用VFP5.0開發(fā)應(yīng)用系統(tǒng)時(shí),結(jié)合數(shù)據(jù)進(jìn)行處理,應(yīng)用最多的是文本框?qū)ο,特別是進(jìn)行中英文的輸入時(shí),來回切換非常繁瑣,所以我們可以借助自定義子類,來實(shí)現(xiàn)中英文輸入的自動切換。其步驟如下:
通過系統(tǒng)菜單欄“文件/新建/類…”啟動“新類”對話框,填入類名:gsTextBox,并設(shè)置父類為:TextBox。按“確定”鍵進(jìn)入類設(shè)計(jì)器畫面。新增一個(gè)屬性,來作為對象是否啟動中文輸入法的控制碼。
通過系統(tǒng)菜單欄“類/新建屬性…”啟動“新建屬性”對話框,按上表設(shè)置屬性,其中可視性設(shè)為:公共。最后設(shè)置GotFocus與LostFocus事件過程:
Gotfocus Event事件過程:
If this是否中文
=imestatus(1)
else
=imestatus(0)
endif
Lostfocus Event事件過程:
=imestatus(0)
到此,類已經(jīng)定義完成,以后只要在設(shè)計(jì)表單時(shí),通過表單控件“工具欄/查看類/添加…”把自定義類加入,并且設(shè)置“是否中文”屬性即可實(shí)現(xiàn)中英文輸入的自動切換。