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)