Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Вниз

Помогите разобраться.....   Найти похожие ветки 

← →
Almaz   (2001-12-20 03:23) [1]

У TTable есть метод CreateTable.
Пример:
with Table1 do
begin
Active := False;

DatabaseName := "C:\TEMP"; // Расположение таблицы
TableType := ttParadox;
TableName := "mytable"; // Имя таблицы

{ описание полей будущей таблицы }
with FieldDefs do
begin
Clear;
Add("Field1", ftInteger, 0, True);
Add("Field2", ftString, 30, False);
end;

// Создаем таблицу
CreateTable;
end;

Удачи.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.008 c