设置默认输入法

最新推荐文章于 2023-08-19 07:43:52 发布

一米制造

最新推荐文章于 2023-08-19 07:43:52 发布

阅读量883

点赞数

分类专栏：公用函数源码文章标签：输入法

公用函数源码专栏收录该内容

14 篇文章

订阅专栏

本文介绍了一种在Delphi中通过组件属性批量设置输入法名称(IME)的方法。通过遍历窗体上的所有组件并检查其是否具有ImeName属性来实现。此过程使用了读取配置文件的方法获取IME名称。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

uses TypInfo

procedure SetImeA(AOwner:TForm);
var
i:Integer;
begin
for i := 0 to AOwner.ComponentCount - 1 do
begin
    if GetPropInfo(AOwner.Components[i],'ImeName')<>nil then
    begin
      SetPropValue(AOwner.Components[i],'ImeName',
        readinifile(getinifile,'ime','imename',''));
    end;
end;
end;

评论

被折叠的条评论为什么被折叠?

到【灌水乐园】发言

查看更多评论

添加红包

成就一亿技术人!

hope_wisdom

发出的红包

实付元

使用余额支付

点击重新获取

扫码支付

钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。