Problem creating table at run time
Posted: Fri 26 Oct 2012 18:38
I have the following code snippet. When I step through the code at the last line I get an exception EDatabase error "TYpe mismatch for field 'key', expecting: unknown actual:Memo
Tab is a TUniTable
Any ideas what i am doing wrong
Tab is a TUniTable
Any ideas what i am doing wrong
Code: Select all
TField *f;
Tab->SQL->Clear();
Tab->SQL->Add("CREATE TABLE test (key TEXT NOT NULL PRIMARY KEY, value TEXT)");
Tab->Execute();
f = new TField(NULL);
f->FieldName = "key";
f->SetFieldType(ftString);
Tab->Fields->Add(f);
f = new TField(NULL);
f->FieldName = "value";
f->SetFieldType(ftString);
Tab->Fields->Add(f);
Tab->TableName = "test";
Tab->Active = true;