Variableninhalt als Variablenname

[dagegen]

Hallo, ich habe folgendes gemacht:
Aus einer Datei werden Wörter gelesen und dynamisch in einem Untermenü verarbeitet.

Etwa so:

Code:

      while (not Eof(f)) do
      begin
        readln(f, Line);
        if Line <> '' then begin
          NewMenuItem := TMenuItem.Create(self);
          NewMenuItem.Caption := Line;
          NewMenuItem.GroupIndex := 5;
          NewMenuItem.RadioItem := True;
          NewMenuItem.OnClick := miProfileClick;
          miProfiles.Add(NewMenuItem);
        end;
      end;

Das funktioniert auch schon mal. Beim Anklicken eines dieser Einträge wird die Prozedur miProfileClick aufgerufen. Funzt auch. Aber da die Einträge alle RadioItems sind, soll davor auch ein dicker Punkt erscheinen, wenn der Menüeintrag selektiert ist.
Wie kann ich das machen?

Code:

procedure miProfileClick(Sender: TObject);
begin
  Sender.Checked := True;
end;

So funktioniert es jedenfalls nicht. Ich brauche irgendwie den Inhalt von "Sender", um ihn als Variablennamen weiterzuverwenden.

[alcaeus]

Hi dagegen,

probier mal TMenuItem(Sender).Checked := True Greetz
alcaeus

[dagegen]

Hey, das ging ja schnell !!!! Ich wollte gerade nach Hause gehen, naja dann kann ich ja doch noch was tun!

Tausend Dank! Das funktioniert!