Ado Table

← →
KyRo (2006-03-01 18:18) [0]

Подскажите как програмно создать тейбл и приконектить его к базе ?

← →
Ega23 © (2006-03-01 18:39) [1]

Например, так:
With TADOTable.Create(Self) do
begin
Connection:=MyADOConnection;
.......
end;

← →
KyRo (2006-03-01 18:49) [2]

Спасибо

← →
KyRo (2006-03-06 12:42) [3]

With TADOTable.Create(Self) do
begin
Connection:=MyADOConnection;
.......
end;

Подскажите если ругается на
TADOTable.Create(Self) - Self пишет не зарегестрированый идентификатор
из за чего это ?

← →
msguns © (2006-03-06 13:23) [4]

>TADOTable.Create(Self) - Self пишет не зарегестрированый идентификатор
из за чего это ?

Из-за того, что эта строка выполняется вне процедур или методов класса

← →
sniknik © (2006-03-06 13:24) [5]

> из за чего это ?
Self имет смысл в методе класса (procedure of object) неявный но обязательный параметр.
ты же его видать пытаешся применить в регулярной (простой) процедуре.

← →
Ega23 © (2006-03-06 13:24) [6]

А что такое Self?
А Self - это указатель на экземпляр класса, в рамках которого выполняется данный метод.
Т.е. если у тебя есть процедура
TForm1=class(TForm) ....... public procedure MyProc; end; var Form1:TForm1; .................... procedure TForm1.MyProc; begin .... Self .... end;

Так вот, в данном контексте Self - всё равно, что Form1.

В случае, если ты просто так создаёшь компонент, то можешь указывать Create(nil);
Но тогда задача вызова деструктора данного объекта ложиться на твои могучие плечи.

← →
KyRo (2006-03-06 13:31) [7]

Да я создаю компонент вне класса в отдельном модуле.

> В случае, если ты просто так создаёшь компонент, то можешь
> указывать Create(nil);
> Но тогда задача вызова деструктора данного объекта ложиться
> на твои могучие плечи.

Подскажите как вызвать тогда деструктор
Просто Destructor Component(nil) ???

← →
KyRo (2006-03-06 13:32) [8]

или вызывать Destroy ?

← →
msguns © (2006-03-06 13:34) [9]

Пример создания, использования и уничтожения "разового объекта доступа к БД:

with TADOQuery.Create(nil) do try Connection := ...; SQL.Text := ... ; Open; Close; finally Free; end;

Не использовать TADOTable !!!

← →
Ega23 © (2006-03-06 13:39) [10]

> Не использовать TADOTable !!!

Согласен. :о)

← →
Megabyte © (2006-03-06 14:46) [11]

> > Не использовать TADOTable !!!

Скажу больше: Не использовать TADOQuery. ;)
Есть TADODataset!

← →
Ega23 © (2006-03-06 14:49) [12]

> Скажу больше: Не использовать TADOQuery. ;)
> Есть TADODataset!

Здесь можно поспорить. У TADOdataSet нет, к примеру, свойства SQL.
В принципе, не страшно, т.к. CommandText есть, но для преемственности с BDE-шными НД - некузяво получается...

> но для преемственности с BDE-шными НД - некузяво получается...

А зачем преемственность с БДЕ?

> Про преемственность лучше забыть, зачем тянуть грехи прошлого
> в светлое будущее.

Есть масса различных функций, написанных ещё для BDE.

>Anatoly Podgoretsky © (06.03.06 20:27) [15]
>Про преемственность лучше забыть, зачем тянуть грехи прошлого в светлое будущее.

Действительно.
Кидаем нафик все эти "грехи прошлого" в виде компонент дотупа к БД и пишем доступ непосредственно через апи

> ...зачем тянуть грехи прошлого
> в светлое будущее.

Хорошо сказано. :)

Ado Table Найти похожие ветки