🚀 go-pugleaf

Every records in DB must have unique identificator(primary key)
just create field "id" and make it unique.
"Gunter Gemmel" <info@gungem.de> �������/�������� � �������� ���������:
news:3deba522@newsgroups.borland.com...
> Hi!
>
> I create a ttParadox Table during runtime with three fields "author",
> "description", "phrase" (memo). The author field should not be unique but
> cppbuilder forces me to set it unique, because otherwise the program
> produces errors. What am I doing wrong? In general: No field needs to be
> unique but how can I set this.
>
> Here is my code for creating the table:
>
> Table->Active = false;
>     Table->DatabaseName = Dir;
>     Table->TableType = ttParadox;
>     Table->TableName = "Aphorism";
>
>     if (!Table->Exists) {
>         Table->FieldDefs->Clear();
>
>         TFieldDef *pNewDef = Table->FieldDefs->AddFieldDef();
>         pNewDef->Name = "Author";
>         pNewDef->DataType = ftString;
>         pNewDef->Size = 255;
>
>         pNewDef = Table->FieldDefs->AddFieldDef();
>         pNewDef->Name = "Description";
>         pNewDef->DataType = ftString;
>         pNewDef->Size = 255;
>
>         pNewDef = Table->FieldDefs->AddFieldDef();
>         pNewDef->Name = "Phrase";
>         pNewDef->DataType = ftMemo;
>         pNewDef->Size = 50;
>
>         Table->IndexDefs->Clear();
>         Table->IndexDefs->Add("Autor", "Author", TIndexOptions() <<
> ixPrimary << ixUnique); // Here I have to use ixUnique otherwise the
program
> produces errors
>         Table->IndexDefs->Add("Beschreibung","Description",
TIndexOptions()
> << ixUnique);
>
>         Table->CreateTable();
>
>         Application->MessageBox("Neue Datenbank wurde angelegt.", "Gungem
> Aphorism", MB_OK | MB_ICONINFORMATION);
>     }
>
> Thank you for your help!
> Gunter.
>
>
>
>