Zwei Klassen möglichst "OOP" kommunuzieren lassen

[DGL-luke]

Delphi-Quellcode:

type
  TChangeLanguageEvent = procedure(Sender: TLangMain; NewString: string) of object;

  TLangMain = class
    ...
    procedure RegisterSensitiveControl(StringId: Integer; OnLanguageChange: TChangeLanguageEvent;);

Damit können sich deine Language-sensitiven komponenten jederzeit bei der Language-verwaltung mit einer zur designzeit vergebenen id registrieren und bekommen bei jeder änderung der sprache den neuen string (der sich problemlos mit platzhaltern versehen lässt - Format lässt grüßen) per Event mitgeteilt.

Musst du natürlich alles noch implementieren