Freigeben über

Übergeben von Parametern als Verweis

  • Artikel

Sie können Parameter jedes Mal oder nur in einer bestimmten Instanz als Verweis übergeben.

So übergeben Sie Parameter als Verweis

  • Verwenden Sie die TO REFERENCE-Klausel des SET UDFPARMS-Befehls vor dem Aufrufen der UDF:

    - Oder -

  • Verwenden Sie das @-Zeichen zum Übergeben einer Variablen oder eines Arrays als Verweis, wie im folgenden Beispiel:

    ? "UDF value: " + STR(plusone(@nX))

  • Um ordnungsgemäß in einem COM-Objekt auf einen Variant-Datentyp zu verweisen, muss zuerst eine Instanz der Variable zu dem Typ erstellt werden, dessen Abruf erwartet wird. Dies gilt nur, wenn Visual FoxPro als Client mit früher Bindung verwendet wird.

       DEFINE CLASS varianttest AS SESSION OLEPUBLIC
      FUNCTION varret(outVal AS VARIANT@, inVal AS VARIANT) AS VOID
         OutVal = inVal
      ENDFUNC
   ENDDEFINE

    Nachdem diese Klasse in eine DLL mit dem Namen myServer integriert wurde, können Sie wie in folgendem Code auf die Daten verweisen:

       x = CREATEOBJECT("myServer.varianttest","","")
   ov = ""
   tt.varret(@ov, "string")      && Sets string value
   ov = 0
   tt.varret(@ov, 123)         && Sets ov to an integer value
   ov = 0.0
   tt.varret(@ov, 44.44)      && Sets ov to a real numeric value
   ov = l
   tt.varret(@ov, f)            && Sets ov to a boolean value

Siehe auch

Übergeben von Parametern als Wert | SET UDFPARMS-Befehl | Benutzerdefinierte Funktionen | Datenbearbeitung