Probleme mit IndexDef beim Erzeugen einer P7-Tabelle

[Peter Gans]

Hallo,<br>
<br>
ich hab ein Problem bei der Erstellung einer Paradox7-Tabelle. Das Erstellen der Tabelle funktioniert einwandfrei bis zu dem Punkt, an dem ein Sekundärindex erstellt werden soll. Dann brich mein Programm mit Fehlermeldungen wie "Tabelle nicht vorhanden Datei oder Verzeichniss nicht vorhanden" o.a. ab.<br>
Wenn der Sekundärindex aus mehr als einem Feld besteht läuft die Erstellung der Tabelle Problemlos ab.
<br>
hier der Code:
<br>
WITH T_Eventverzeichniss DO<br>
BEGIN<br>
TableType := ttParadox;<br>
TableName := 'Eventverzeichniss';<br>
WITH FieldDefs DO<br>
BEGIN<br>
Clear;<br>
ADD('EID', ftAutoInc, 0,False); //PRIMÄRSCHLÜSSEL<br>
ADD('OID', ftSmallInt,0,False);<br>
ADD('EVENTDATUM',ftDate, 0,False);<br>
ADD('BEGEGNUNG', ftString, 60,False);<br>
//usw.<br>
END;<br>
WITH IndexDefs DO<br>
BEGIN<br>
Clear;<br>
add('','EID',[ixPrimary]);<br>
add('Datum','EVENTDATUM',[]); <- PROBLEM!!<br>
END;<br>
CreateTable;<br>
END;<br>
<br>
Sobald anstelle von<br>
add('Datum','EVENTDATUM',[]); <- PROBLEM!!<br>
die Zeile so aussieht<br>
add('Datum','EVENTDATUM;OID',[]);<br>
läuft die Sache wieder. Ich habs auch mit anderen Feldern probiert, um eine Fehlfunktion mit Datumsfelder auszuschliessen - alles gleich geblieben.