Создание БД

← →
mate (2003-01-10 15:38) [0]

Подскажите плиз как через запрос создать новую базу данных (*.db)и установить правильно все её параметры. Буду очень рад подробному примеру.

← →
passm (2003-01-10 15:53) [1]

mate © (10.01.03 15:38)> Если подразумевается локальная БД, то под базой подразумевается каталог и запроса на его создание нет.
Если клиент/серевер, то CREATE DATABASE... далее зависит от СУБД.

← →
Соловьев (2003-01-10 15:54) [2]

БД на основе Paradox или таблицу Paradox?

← →
mate (2003-01-10 15:58) [3]

Соловьев
Для начала хотя бы таблицу Paradox.

← →
Соловьев (2003-01-10 16:00) [4]

uses DB, DBTables, StdCtrls;

procedure TForm1.Button1Click(Sender: TObject);
var

tSource, TDest: TTable;
begin
TSource := TTable.create(self);
with TSource do begin
DatabaseName := "dbdemos";
TableName := "customer.db";
open;
end;
TDest := TTable.create(self);
with TDest do begin
DatabaseName := "dbdemos";
TableName := "MyNewTbl.db";
FieldDefs.Assign(TSource.FieldDefs);
IndexDefs.Assign(TSource.IndexDefs);
CreateTable;
end;
TSource.close;
end;

← →
Соловьев (2003-01-10 16:04) [5]

with TTable.create(self) do begin

DatabaseName := "C:\temp";
TableName := "FOO";
TableType := ttParadox;
with FieldDefs do Begin
Add("Age", ftInteger, 0, True);
Add("Name", ftString, 25, False);
Add("Weight", ftFloat, 0, False);
End;
IndexDefs.Add("MainIndex","IntField", [ixPrimary, ixUnique]);
CreateTable;
End;

← →
MsGuns (2003-01-10 16:55) [6]

Чтобы создать таблицу (и не только) достаточно пару дней поштудировать Local SQL (это если безо всяких серверов).
Если локальную (dBase,Paradox) то проще всего DBD (DataBase DeskTop)
Если речь идет о проектировании БАЗЫ ДАННЫХ, состоящей не из одной таблицы, то, прежде чем создавать что-либо, надо сначала хотя бы посмотреть как это делают другие или почитать что-нибудь (хоть того же Фаронова), а лучше и то и другое

Создание БД Найти похожие ветки