Hast du auch ein Objekt der Klasse
Tfmoptions
angelegt?
Delphi-Quellcode:
procedure Tfmoptions.tbtnDEClick(Sender: TObject);
begin
Assert(Assigned(self), 'Objekt der Klasse Tfmoptions ist nil!'); // zur Sicherheit
gSprache:='De';
tbtnDE.Checked:=True;
tbtnEN.Checked:=False;
tbtnFR.Checked:=False;
end;