На главную
Подписка
Новости


Рейтинг@Mail.ru











Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Компоненты / Создание компонента TTable без формы 3 Сделать домашней страницей Добавить в избранное Написать писмо

Создание компонента TTable без формы 3


Для создания таблицы программным способом вы должны сделать приблизительно следующее:


with Table1 do
begin
  Close;
  TableName := 'test.db';
  TableType := ttParadox;
  DatabaseName := 'Sample';
  FieldDefs.Clear;
  {FldName,FldType,FldLength,Required}
  FieldDefs.Add('Field1',ftString,10,false);
  ...
  { Создание первичного индекса }
  IndexDefs.Add('','Field1',[ixPrimary]);
  CreateTable;
end;


Copyright ©   "DELPHI WORLD"   E-mail:   delphiworld@mail.ru  http://www.delphiworld.narod.ru
Источник получения информации: http://www.delphiworld.narod.ru
Hosted by uCoz