Форум: "Базы";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
ВнизСоздание таблицы из Delphi. Найти похожие ветки
← →
Mick (2001-12-04 17:42) [4]
with TTable.Create(nil) do
try
TableType:=ttDBase;
TableLevel:=3;
DatabaseName:="C:\Data";
TableName:="Dbase 3 Level Table.dbf";
with TFieldDefs.Add do
begin
DataType:=ftBCD;
Name:="FirstField";
end;
with TFieldDefs.Add do
begin
DataType:=ftString;
Name:="SecondField";
Size:=10;
end;
CreateTable;
finally
Free;
end;
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.008 c