MCFORMS.FORMS_LIST_ADD

//Scriptfunktion 'MCFORMS.FORMS_LIST_ADD'
////Fügt einen Eintrag zu einer MCFORM-Liste hinzu.

//Parameter:
//- List Text:Der Text der einzufügenden Zeile
//- Value: Der Wert, der zurückgeliefert wird, wenn die Zeile ausgewählt wird. Kann leer bleiben, wenn er gleich dem List Text ist.
//- Selected: Gibt an, ob die Zeile bereits vorselektiert ist.

//Beispiel:

SQL=""
SQL="Select Kuerzel, Name, Vorname FROM Arzte order by name"
ANZREC=DB.OPEN{{APPPATH}\DATABASE\STAMMDAT.MDB,{SQL},True}
ANZ="0"

DO{}
	ANZ=SUM{{ANZ}+1}
	RESULT=""
	RESULT=DB.GETRECORD{FIELD_}
	RES=MCFORMS.FORMS_LIST_ADD{{FIELD_NAME}{$K} {FIELD_VORNAME},{FIELD_KUERZEL},False}
	RESULT=DB.NEXTRECORD{}

	IFBLOCK{ANZ={ANZREC}}
		EXIT{}
	ENDIF


LOOP{}

RESULT=DB.CLOSE{}

RES=MCFORMS.FORMS_LIST_SHOW{Personen Liste (Wählen Sie max. 3 personen aus!),3,1}

AUSGEW=""
ANZ="0"
IFBLOCK{MCFORM.LIST_RESULT_COUNT>0}
	DO{}
		ANZ=SUM{{ANZ}+1}

		TXT=""
		TXT="MCFORM.LIST_RESULT"
		TXT={TXT}{ANZ}
		WERT=GETVAR{{TXT}}
		AUSGEW={AUSGEW}{WERT}{RET}

		IFBLOCK{ANZ={MCFORM.LIST_RESULT_COUNT}}
			EXIT{}
		ENDIF

	LOOP{}
	RES=MCFORMS.FORMS_MESSAGE{Ausgewählte Personen,{AUSGEW},1}
ELSE
	RES=MCFORMS.FORMS_MESSAGE{Ausgewählte Personen,Sie haben keine Personen ausgewählt!,1}
ENDIF