procedure TLang.SetLang(const Value: string);
begin
FLang := Value;
if not(csLoading in ComponentState) then
begin
if FLang = 'en' then
ResetLang
else
LoadLangFromStrings(LangStr[FLang]);
end;
end;

这个 Delphi 官方出来的 TLang 控件的代码，里面居然硬编码默认语言是 en，而且还一定要是小写。而且它公开的属性或者方法里面，没有恢复到默认语言的项目。 看起来写这个 code 的人，大概是刚毕业的学生？

如果我来设计，至少应该有一个 ResetLang 的 public 的方法，或者，其 Lang 这个 property 有一个恢复到默认的比如 【Default】的字符串属性。

它现在对于如何切换语言，只有一个办法：设置 Lang 这个 property。但如何恢复为自己代码里面或设计期写语言，却没有任何的 Method 或者 property。Help 里面也没有任何说明。只好看进去 Source 才发现，居然是 Hard code 一个 en 进去。