Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создать таблицу(ADO) в run-time'е [MS Access]


John_Doe ©   (2006-02-16 16:47:00) 

Вот код:

procedure TdmTables.RegWare;
var NewWareType: TAdoTable;
begin
 NewWareType:=TAdoTable.Create(Self);
 with NewWareType do
   begin
     Connection:=acnTicaret;
     TableName:='sdasd';
     Active;
     Free;
   end;
end;


PS.Ошибки не выдает,но и ничего не делает.
Почему-то не появляется новая таблица,когда открываю MS Access.


John_Doe   (2006-02-18 14:41:00) [1]

Уже со вчерашнего дня начал. :(


sniknik   (2006-02-17 13:20:00) [2]

> Просто увы SQL толком не знаю. :(
к сожалению для вас, придется его учить... либо бросать заниматься клиент серверными базами и их подобиями.


Fay   (2006-02-17 12:26:00) [3]

2 John_Doe   (17.02.06 12:25) [2]
Ничего страшного не произойдёт (надеюсь), если вы его немного изучите.


John_Doe   (2006-02-17 12:25:00) [4]

acnTicaret у меня это TAdoConnection.
Вы очевидно мели ввиду SQL запрос.
Просто увы SQL толком не знаю. :(


Fay   (2006-02-17 12:07:00) [5]

Создаётся таблица без полей?! Очень интересно.

NewWareType:=TAdoTable.Create(Self);
with NewWareType do
  begin
    Connection:=acnTicaret;
    TableName:='sdasd';
    Active; // Это чё?! "- Петька, приборы!?" - "300!"
    Free;
  end;
end;

Короче, CREATE TABLE (....) + acnTicaret.Execute


Наверх

Титульная страница Поиск, карта сайта Написать письмо