TurboDB VCL Komponenten Bibliothek

TTdbFieldDefs.Add

TTdbFieldDefs

Previous  Top  Next

Die Eigenschaft Add erstellt ein neues Felddefinitionsobjekt und fügt es der Eigenschaft Items dieses TTdbFieldDefs-Objekts hinzu.

Delphi Syntax:

function Add(const Name: String; DataTypeTdb: TTdbDataType; Size: Integer = 0; Required: Boolean = False): TTdbFieldDef;

C++ Syntax:

HIDESBASE TTdbFieldDef* __fastcall Add(const AnsiString Name, TTdbDataType DataTypeTdb, int Size = 0, bool Required = false, const AnsiString Specification);

Beschreibung

Verwenden Sie Add um eine neue TdbFieldDef zu der Liste der Felddefinitionen hinzuzufügen. Add gibt eine Referenz auf das neue TdbFielDef Objekt zurück.

Add verwendet die übergebenen Werte in Name, DataType, Size und Required und weist Sie den entsprechenden Eigenschaften der neuen Felddefinition zu.

Falls bereits eine Felddefinition mit diesem Namen existiert wird ein EDatabaseError ausgelöst.

Beispiel

Der folgende Code leert die FieldDefTdb Liste und fügt drei Felder ein:

// Leeren der Liste der Felddefinitionen
TdbTable1.FieldDefsTdb.Clear;
// Ein Stringfeld der Laenge 40 hinzufuegen
TdbTable1.FieldDefsTdb.Add('Name', dtString, 40);
{ Ein Auswahlfeld mit den Werten "Sales", "Marketing", "Development" hinzufuegen }
with TdbTable1.FieldDefsTdb.Add('Department', dtEnum) do Specification := 'Sales,Marketing,Development';
{ Ein Zaehlerfeld hinzufuegen, das als RecordId fuer den Datensatz verwendet wird. Referenzen auf Datesaetze dieser Tabelle zeigen den Namen der Person an. }
with TdbTable1.FieldDefsTdb.Add('RecordId', dtAutoInc) do Specification := 'Name';
{ Die Tabelle mit den neuen Felddefinitionen restrukturieren. }
TdbTable1.AlterTable;

Siehe auch

TTdbFieldDef