ShowWordCommander2()
ShowWordCommander2() - WordCommander
Die Funktion öffnet den WordCommander mit individuell befüllten Datensätzen. Wenn mehrere Gruppen (Datensätze als Array) übergeben werden, muss die Anzahl je Gruppe identisch sein.
Parameter | Beschreibung |
---|---|
aTables:A | Gruppen inkl. Datensätze (Array of Datasets) |
Rückgabewert
keiner
Beispiel
CODE
| aTables, aName, aVorname, aField |
// Erste Gruppe anlegen
aVorname := CreateObject('TMemCalcTable', 'Vorname'),
AddMemField(aVorname, 'Firstname', 'C', 10, 0),
// Gruppennamen definieren
aVorname.AliasName := 'Vorname',
aVorname.Active := true,
// Wird kein DisplayLabel gesetzt, wird der Feldname verwendet!
aField := DBField('Firstname', aVorname),
aField.DisplayLabel := 'Vorname',
DBAppend(aVorname),
aVorname:Firstname := 'Dieter',
DBAppend(aVorname),
aVorname:Firstname := 'Heinrich',
DBAppend(aVorname),
aVorname:Firstname := 'Olav',
DBPost(aVorname),
// Zweite Gruppe anlegen
aName := CreateObject('TMemCalcTable', 'Name'),
AddMemField(aName, 'Lastname', 'C', 10, 0),
// Gruppennamen definieren
aName.AliasName := 'Name',
aName.Active := true,
// Wird kein DisplayLabel gesetzt, wird der Feldname verwendet!
aField := DBField('Lastname', aName),
aField.DisplayLabel := 'Nachname',
DBAppend(aName),
aName:Lastname := 'Pumps',
DBAppend(aName),
aName:Lastname := 'Diener',
DBAppend(aName),
aName:Lastname := 'Schmitt',
DBPost(aName),
// Reihenfolge der Gruppen
aTables := {aVorname, aName},
ShowWordCommander2(aTables)