Freigeben über

WITH ... ENDWITH-Befehl

  • Artikel

Gibt mehrere Eigenschaften für ein Objekt an.

WITH ObjectName
   [.cStatements]
ENDWITH

Parameter

  • ObjectName
    Gibt den Namen des Objekts an. ObjectName kann der Name des Objekts oder ein Verweis auf das Objekt sein.
  • .cStatements
    cStatements kann aus einer beliebigen Anzahl von Microsoft Visual FoxPro-Befehlen bestehen, die zur Angabe von Eigenschaften für ObjectName verwendet werden. Setzen Sie einen Punkt vor cStatement, um zu verdeutlichen, dass es sich um eine Eigenschaft von ObjectName handelt.

Hinweise

WITH ... ENDWITH eignet sich gut dazu, mehrere Eigenschaften für ein einzelnes Objekt anzugeben. Beachten Sie, dass Sie innerhalb einer WITH ... ENDWITH-Struktur auch Methoden ausführen können.

Beispiel

Im folgenden Beispiel wird eine benutzerdefinierte Klasse mit dem Namen Employee erstellt. Nachdem die Klasse Employee mit CREATEOBJECT( ) erstellt wurde, werden mit Hilfe von WITH ... ENDWITH mehrere Eigenschaften für die Klasse gesetzt. Dann werden die Werte für die Eigenschaften angezeigt.

moemployee = CREATEOBJECT('employee')

WITH moemployee
   .First_Name = 'John'
   .Last_Name = 'Smith'
   .Address = '16 Maple Lane'
   .HireDate = {^1998-02-16}
ENDWITH

CLEAR
? moemployee.First_Name + ' '
?? moemployee.Last_Name
? moemployee.Address
? moemployee.HireDate

DEFINE CLASS employee AS CUSTOM
      First_Name = SPACE(20)
      Last_Name = SPACE(20)
      Address = SPACE(30)
      HireDate = {  -  -  }
ENDDEFINE

Siehe auch

:: Geltungsbereich-Auflösungsoperator | ADD CLASS | CREATE CLASS | CREATE CLASSLIB | CREATEOBJECT( ) | GETOBJECT( ) | MODIFY CLASS | RELEASE CLASSLIB | SET CLASSLIB