Delphi XEのヘルプ「リソース DLL の動的な切り替え」には次のようなコードが紹介されている。
const
FRENCH = (SUBLANG_FRENCH shl 10) or LANG_FRENCH;
if LoadNewResourceModule(FRENCH) <> 0 then
ReinitializeForms;
このコードをコピーしただけでは動作しない。
このコードを実行するにはユニットをusesに追加する必要がある。
uses reinit
これだけでは動作しない。
reinitユニットが見つからないためだ。
このreinitはDemosディレクトリ下のRichEditサンプルに含まれている。
RichEditサンプルに含まれているreinit.pasをプロジェクトに登録すると動作するようになる。
└RAD Studio
└8.0
└Samples
└Delphi
└VCL
└RichEdit
└reinit.pas
このユニットについての説明は、Delphi 2010まではヘルプに掲載されていたようだ。
(Delphi 2010のヘルプリソース DLL の動的な切り替え)
reinit.pasで躓いていましたが、この記事で助かります。
ありがとうございます。