Me - Operator (Zugriff auf das eigene Objekt)

betrifft

Dieser Operator erlaubt den Zugriff auf das eigene Objekt.

Der Operator erlaubt z.B. die Ermittlung des Klassennamens, von dem das Objekt erzeugt wurde:

MeineKlasse := Me

Auch kann das Objekt auf eine andere Klasse geändert werden:

Me := "Waschmaschine"

Auch kann in Funktionen auf eine Strukturvariable des Objektes zugegriffen werden, auch wenn eine lokale Variable mit gleichem Namen angelegt wurde:

 

Beispiel zur Ermittlung des Wertes einer Klassenvariablen bei gleichzeitiger Existenz einer lokalen Variablen mit gleichem Namen

 

Function Beispiel() As Void

   Dim Visible As Boolean

  

   Visible := True #Setzt die lokale Variable Visible auf True

  

   Me.Visible := True #Setzt die Variable Visible des Objektes auf True

  

  

End Function

 

Beispiel über den Objektwechsel mit Zuweisung eines Klassennamens an Me

 

Function Beispiel() As Void

   Me := "Spülmaschine"

  

   #Nach dem Objektwechsel muss ein Typecast verwendet werden

   #um auf Merkmale der neuen Klasse zugreifen zu können

   #sofern diese nicht in der Ursprungsklasse definiert sind

   #Das ist damit begründet, weil die Funktion noch weiterhin

   #im Kontext des Objektes vor dem Objektwechsel ausgeführt wird

  

   MsgBox(Me:"Spülmaschine".Spülprogramm)

End Function