Namen von boolschen Variablen / Bool Variablen überwachen

[Sugar]

Hallo Forum,

ich möchte in einer Anwendung grafisch anzeigen wenn gewisse Schalter (bool) gesetzt sind und natürlich auch die Anzeige entfernen, wenn der Schalter nicht gesetzt ist.

Den Schalter kann der User selbst jederzeit setzen. Zum Beispiel:

Ich erlaube dem User auf ein PopUpMenü-Eintrag zu klicken um einen Editiermodus zu aktivieren.
Verschiedene Aktionen (speichern, ESC-Taste, abbrechen etc.) beenden diesen Editiermodus. Dahinter verbirgt sich eine boolsche Variable die in jedem einzelnen Eventhandler entsprechend verändert wird.

Mir schwebt nun eine Funktion vor, die sämtliche boolschen Variablen umschaltet und abhängig von der Variable weitere Dinge verrichtet:

Also praktisch so:

Jemand schaltet das Editieren ein (boolEDIT:=TRUE) passiert nicht auf den Button oder PupUpKlick, sondern der Button schickt die Variable an diese Funktion und diese schaltet den Wert um und reagiert abhängig vom Namen der Variablen.

So nach dem Motto:

Procedure SwitchBool ( NameDerBoolVariable: ??? (String) )
Begin
NameDerBoolVariable := Not NameDerBoolVariable;
if NameDerBoolVariable = 'boolEdit' then
begin
// zeig was sexy an..
end;