Delphi-Help

Главная Статьи Paradox Создание таблицы Paradox

Создание таблицы Paradox

Оцените материал
(0 голосов)


Создание таблицы Paradox

Вот маленький кусочек кода для создания таблицы Paradox:

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;
Прочитано 5691 раз

Авторизация



Счетчики