I implemented language translation in an application by putting all strings at runtime in a TStringList with:
procedure PopulateStringList; begin EnglishStri
In Delphi 2009 or later I would use TDictionary< string,string > in Generics.Collections. Also note that there are free tools such as http://dxgettext.po.dk/ for translating applications.