Код
Query1.DatabaseName:=ExtractFilePath(Application.ExeName);
Query1.SQL.Text:='Create table Teams '+
'(Code Autoinc,'+
' Condition character(1),'+
' FullName character(200),'+
' Name character(50),'+
' Country SmallInt default 1,'+
' City SmallInt,'+
' Chief character(150),'+
' Trainer character(150),'+
' Memo Blob(200,1),'+
' Glasses SmallInt default 0,'+
' Primary Key (Code))';
Query1.ExecSQL;
На сколько я помню, файл Paradox создается по-умолчанию (поэтому я не указываю расширение после имени таблицы), а чтобы создался DBASE нужно как-то по другому объявлять имя.
Вместо Alias я обычно использую DatabaseName, так проще - не нужно после создания базы прописывать псевдонимы. Установил на другую машину, указал путь к базе и все... Плюй в потолок.
А делаю я следующее: бросаю на пустую форму TQuery & TButton и в обработчике нажатия кнопки пишу этот код. Никакие св-ва у компонентов не меняю. Судя по всяким help'ам все должно работать. В принципе и не ругается. Но и не делает того, что обещано
