Alle Units mit GetText übersetzen, oder nur Unit1?

[AlexII]

Hallo,

ich übersetze mein Programm mit GNU gettext. Nun die Frage muss ich in allen Units folgendes aufrufen

Delphi-Quellcode:

Unit2
....

If (Language='German') or (GetCurrentLanguage()='de_DE') or (GetCurrentLanguage()='de_AT') or (GetCurrentLanguage()='de_CH') then
begin
UseLanguage('de_DE');
ReTranslateComponent(Self);
end;

wenn bei mir alle Units in dem Implementation-Abschnitt der Unit1 eingebunden sind?

Delphi-Quellcode:

implementation

uses Unit2, Unit3, Unit4;
....

Reicht es wenn ich die ganze Übersetzung in Unit1 realisiere? Ich denke ja, oder? Bin mir da aber nicht sicher.

Danke!