Aufruf: under construction

STRING = TransFormX(txVal AS VARIANT , tnBit AS INTEGER)

Rückgabe: under construction

Rückgabe der Funktion: STRING

Code: under construction

PROCEDURE TransFormX (txVal AS Variant, tnBit AS INTEGER) AS STRING;
		HELPSTRING "Typkonvertierung nach Zeichen."
	** Automatische Typkonvertierung nach Zeichen unter Beibehaltung des QuellTyps
	** Parameter:
	** txVal:	Wert der nach zeichen konvertiert werden soll
	** tnbit:	Optionen, falls nicht angegeben, dann 0
	** 			BIT0 - Wert1: Zeichenwerte werden nicht mit Hochkomma dargestellt --> .f.="Das ist der Text" / .t.=Das ist der Text
	**			BIT1 - Wert2: POINT: 0=".", 2=","
	** Rückgabe: konvertierter Wert als String (Zeichen)
	RETURN My.Functions.Strings.TransFormX(m.txVal,m.tnBit)
ENDPROC