[Alegun]

Для начала

Код:

uses DB, DBTables, StdCtrls;

...

if CreateTable('"mytab.dbf"',
 'FLD_1 CHARACTER(50), ' +
 'FLD_2 CHARACTER(50), ' +
 'FLD_3 CHARACTER(50), ' +
 'FLD_4 CHARACTER(50), ' +
 'FLD_5 CHARACTER(50) ', '') then ...
 // значит создалась таблица c пятью одинаковыми полями 
else
 // что-то пошло не так

...