Code: GDI Method or Property

*/ Kurzbeispiel für den Zugriff auf diese Struktur
*/ Der Zugriff erfolgt über: My.GDI.Enum
*/ Wird dieses Objekt in einem REPLACE oder einer Schleife SCAN ... ENDSCAN | FOR ... NEXT benötigt
*/ so sollte vor der Schleife die Objektstruktur in eine Variable geholt werden!
*/ Die Ausführungsgeschwindigkeit wird dadurch sehr vergrößert!
*/ Beispiel:
*/ Definieren einer LOKALEN Variablen
LOCAL loEnum AS My.GDI.Enum
*/ Setzen der Variablen
loEnum = My.GDI.Enum
*/ Jetzt erst die Schleifen durchlaufen... man beachte ALL, dass können ne Menge Sätze sein...
REPLACE ALL Feldname1 WITH loEnum.Function1(),Feldname2 WITH loEnum.Function1(), ...
*/ Oder in einer Schleife...
SCAN
	lvValue = loEnum.Function(Alias.Spalte) + 25
	lvValue = loEnum.Function2(m.lvValue)
	REPLACE Feldname WITH m.lvValue,...
ENDSCAN
*/ Es sind auch geschachtelte Aufrufe möglich...

Memberliste von Enum

Liste der Methoden von Enum

Hilfeinformation

Boolean = My.GDI.Enum.Equals(toObject1, toObject2)
Boolean = My.GDI.Enum.Equals(toObject1,toObject2)

String = My.GDI.Enum.GetHashCode(toObject AS Object)
String = My.GDI.Enum.GetHashCode(toObject)

LOCAL lcString AS String
*/ Rückgabe eines eindeutigen Suchbegriffs
lcString = My.GDI.Enum.GetHashCode()
=MESSAGEBOX(m.lcString,64,"HashCode...")

Variant = My.GDI.Enum.GetName(toEnum, tnIndex)
Variant = My.GDI.Enum.GetName(toEnum,tnIndex)

String = My.GDI.Enum.GetNameByValue(toEnum, tvValue AS Variant)
String = My.GDI.Enum.GetNameByValue(toEnum,tvValue)

Array = My.GDI.Enum.GetNames(toEnum)
Array = My.GDI.Enum.GetNames(toEnum)

Array = My.GDI.Enum.GetValues(toEnum)
Array = My.GDI.Enum.GetValues(toEnum)

*/ Beispielcode
*/ Setzen des Startpfades von PMS32 (lokal)
CD C:\PMS32
*/ Aktivieren von My
My = NEWOBJECT("pmsmy","pmsmyhandler.vcx","pmsmyhandler.app")
*/ Setzen des zuletzt gewählten Mandanten
My.cIdx02=My.cIdx02
*/ Abruf eines Wertes
? My.Clients.Path.GetValue([RETURN SET('DataSession')])		&& Gibt die DataSession-ID des COM+ Servers zurück
? My.Clients.Path.GetValue([RETURN My._Path])				&& Gibt den Startpfad des COM+ Servers zurück
*/ Da es My auch im COM+ Server gibt kann dort auf die komplette Struktur zugegriffen werden!
? My.Clients.Numbers.GetValue([RETURN My.cIdx02])			&& Gibt die Mandanten ID des COM+ Servers zurück
? My.Clients.Numbers.GetValue([RETURN My.Clients.Path.cDbfDir])

Boolean = My.GDI.Enum.IsDefined(toEnum AS Object, tvValue AS Variant)
Boolean = My.GDI.Enum.IsDefined(toEnum,tvValue)

Object = My.GDI.Enum.MemberwiseClone()

Variant = My.GDI.Enum.New()

Variant = My.GDI.Enum.Parse(toEnum AS OBJECT,tcMemberName AS STRING)
Variant = My.GDI.Enum.Parse(toEnum,tcMemberName)

Number = My.GDI.Enum.BaseName

WAIT WINDOW My.GDI.Enum.BaseName

String = My.GDI.Enum.cMethod

*/ Abruf...
WAIT WINDOW My.GDI.Enum.cMethod

Number = My.GDI.Enum.nError

WAIT WINDOW My.GDI.Enum.nError

Number = My.GDI.Enum.nLine

WAIT WINDOW My.GDI.Enum.nLine