DO - Der FoxPro-Kompatible Skriptinterpreter

createobject

createobject(ClassName AS String, [...ParameterN AS Any]) AS Object

Instanziert ein Objekt.

Parameter ClassName

Der Klassenname des Objektes das instanziert werden soll.

Parameter ParmeterN

Eine Liste an weiteren Parametern die an die Init-Funktion (Konstruktor) des neuen Objektes übergeben werden.

Rückgabewert

Das neu erzeugte Objekt.

Instanzieren eines benutzerdefinierten Objektes

Das folgende Beispiel instanziert ein Objekt der Klasse someClass. Die Klasse ist im gleichen Modul definiert.

  1
  2
  3
  4
  5
  6
  7

LOCAL someObject
someObject = createobject("someClass")
? someObject.someProperty

DEFINE CLASS someClass as Custom
someProperty = .F.
ENDDEFINE

.F.

Instanzieren eines benutzerdefinierten Objektes mit Parametern

Das folgende Beispiel instanziert ein Objekt der Klasse someClass. Die Klasse ist im gleichen Modul definiert. Außerdem wird ein Parameter a an den Konstruktor übergeben und vom Konstruktor der Eigenschaft someProperty zugewiesen.

  1
  2
  3
  4
  5
  6
  7
  8
  9
10

LOCAL someObject
someObject = createobject("someClass", "Hello")
? someObject.someProperty

DEFINE CLASS someClass AS Custom
FUNCTION init(a)
THIS.someProperty= a
ENDFUNC
someProperty = .F.
ENDDEFINE

Hello

Windows COM-Server instanzieren (Nur Windows)

Unter Windows können mit dieser Funktion COM-Server instanziert und verwendet werden. Das folgende Beispiel zeigt wie ein COM-Server instanziert wird um einen regulären Ausdruck auf eine Zeichenkette anzuwenden.

  1
  2
  3
  4
  5

LOCAL foo, res
foo = createobject("VBScript.RegExp")
foo.Pattern = "\d+"
res = foo.execute("Hello 10 World")
? res.Item[0].Value