Das Problem könnte in
procedure TMainForm.ReadLanguageData;
entstehen.
Dort werden die übersetzen Texte aus einer Ini-Datei auf die Caption-Properties geschrieben ohne zu prüfen ob der übersetzte Text überhaupt in der Ini-Datei vorliegt.
Delphi-Quellcode:
// orginal Sourcecode
with TMenuItem(Components[i]) do
if (Action = nil) and (Caption <> '-') then
Caption := ReadString(Self.Name,
Self.Components[i].Name + '.Caption', '');
// so könnte es klappen
var
s: string; // Hilfsvariable
...
with TMenuItem(Components[i]) do
if (Action = nil) and (Caption <> '-') then
begin
s := ReadString(Self.Name,
Self.Components[i].Name + '.Caption', '');
if s <> '' then
Caption := s;
Alles ungetestet (ist mir zuviel Aufwand das ganze Geraffel zu installieren).