2021年计算机等级考试：利用INI文件实现界面无闪烁多语言切换(2)

在Form建立的事件中添加代码，将目录下所有的语言文件名加入选择列表框中。

procedure TForm1.FormCreate(Sender: TObject);

begin

ComboBox1.Items.AddStrings(SearchLanguagePack);

end;

程序的重点在如何切换语言，在ComboBox1的OnChange事件中进行切换操作。

这里我写了SetActiveLanguage过程用于实现这一操作。

procedure TForm1.ComboBox1Change(Sender: TObject);

begin