hallo
Das ist ganz einfach:
Delphi-Quellcode:
procedure TForm1.MenuItem1Click(Sender: TObject);
var
I: Integer;
begin
for I:= 0 to Pred(ControlCount) do
TranslateToEnglish(Controls[I]);
end;
Die procedure TranslateToEnglish kannst du selber rasch implementieren
liebe grüsse